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IDENTIFICATION 
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VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
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113 RESPONDS FUNCTIONALLY THE SAME WITH OR WITHOUT MD TELETYPE. 
114 7 RPERAT INE THA HAT THE DISPLAY TEST Baber Test 
tte Fike’ SPeeaLUatet SIE Te Ohara i Eadincrie 
112 . WITH THE *KBD’ (FUNCTIONAL & ASCII KEYBOARD) TESTS 
119 ee 2. REQUIREMENTS (EQUIPMENT & MEMORY) 
120 ° 2 pee 5 RRAKEASHRALHRERESALERE LES ERALELE RE REEKELARELE RFRA LLKL ELS LEFF FEE 
53 WITH ITH ELTHER OR 16K OF MEMORY AND 1 TO 4 TUBES. 
a3 R W/ CONSOLE DEVICE (TEST 21 ONLY) 
2g . MO-1t -11 HOST W/ Ot INTERFAC 
z a LRT FR FREI REST Wha HARE 
5s c W/ KL8J INT 
29 3. LOADING PROCEDURE 
ii . BARRE BALLET BAR 
32 A. USE STANDARD PROCEDURE FOR LOADING BINARY TAPES 
3 IF A READ IN DEVICE (PC11 of ASR-33) IS AVAILABLE. 





33) 
B. THIS PROGRAM MAY ALSO BE BOOTED OVER FROM THE HOST 


i’. STARTING PROCEDURE 
SELLALELLLLLELSELLALLL LE LLLLLALLRERE 


THERE ARE TWO STARTING ADDRESSES. (1) WITH TELETYPE AND 
(2) WITHOUT A TELETYPE. ) 


1. WITH TELETYPE (OR OTHER TERM TNA 
LOAD AND aaRrt a aaa A ADDRESS "200°. 
WHEN STARTED THE PROGRAM WILL PRINT THE PROGRAM - ‘ 
HEADER AND THEN A SERIES OF QUESTIONS ARE ASKED. ° 
QUESTION NO.1 “FOREIGN CHARACTER SET (Y OR N)?" 


THIS ENABLES THE PROGRAM TO DISPLAY THE FOREIGN 
CHARACTER SET IN THE CHARACTER DISPLAY TESTS IF THE 
FOREIGN CHARACTER ROMS ARE PRESENT. 


eS Rn I 2 b= 0-2 6-2 b-2 b-2 9-2 ba B= bbs F=2 0 2 bo bo Be be Pe bs Po ao Po Bo Poh -2 po 
OD IR UTE Lorur Caundb INU POC BLO Oe 






me - 
SS ,oe QUESTION NO.2 - “NUMBER OF TUBES?” 
re TYPE IN THE NUMBER OF TUBES ON SYSTEM “(1,2,3 OR 4) 
ba ‘a QUESTION NO.3 - “ARE DEFAULT ADDRESSES & VECTORS OK ‘Y OR ND? 
bE oy IF THE ANSWER TO THIS QUESTION WAS 'Y*, THEN STANDARD 
B79 es TFK! KEYBOARD. AND "WE" DEVICE AODRESSES AND VECTOR 
6e~ , ? ADDRESSES WILL BE USED. IT WILL ALSO AUTOMATICALLY 
* . ? 


‘ % 
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Tac. mes? 
169 : ASSOCIATE T Ist Oy, (175610) WITH THE-FIRST TUBE, 

170 DL-175620 WITH THE TUBE AND SO ON. . 

17s IF _ QUEST ESTION N NO.3 WAS 'N’, THEN THE NEXT QUESTIONS 

174 rk FK VECTOR ho Ba <EVIC SS FOR UNIT X" (WHERE X REPRESENTS 
ie “QUE v} Y TYP NG T THE FK "VECTOR AND *DEV Ice 

if atest SEPERA COMMA 

178 AFTER ALL THE FK ADDRESSES HAVE BEEN SETUP, 

180 PROGRAM WILL THEN PRINT: 

181 t YT VECTOR AND DEN ICE ADDRESS FOR UNIT X" - ANSWER SANE AS 
183 

184 THE PROGRAM WILL THEN PRINT 

185 “DL11 VECTOR FOR UNIT X" - WHERE X REPRESENTS THE 

186 UNIT NUMBER OF THE ASSICIATED DL11. ON 

187 TO THIS QUESTION BY TYPING THE DL1i VECTOR ADDRESS. 
188 QUESTION NO.3 - “TUBE °0’,"1’,’2’,'3’,0R "4°" 

191 TO RUN A-TEST ON A SELECTED TUBE, TYPE THE 

138 NUMBER OF THE TUBE TO BE TEST ED (0,1 ¢ 08 3) 

1 AND (CR). ALSO, AN OPTION TO THIS ts TYPE 

194 ae ee THIS WILL CAUSE THE PROGRAM T o fest ALL 

195 & TUBES, ONE AT A TIME ON ANY SpELECTED 

196 is f UE THUS, AFTER COMPLETED 

197 tire NEXT SEQUEN eT i WILL AUTOMATICALLY 
198 . AFTER THE LAST TUBE HAS BEEN TESTED, 

199 acc Estep. WILL RE-CYCLE AND AGAIN BE TESTED. 

200 THIS_ OPE ION CAN ALSO BE USED TO RUN EVERY TEST 

20 ear 1-15) ON EVERY TUBE (REFER TO SECTION 14.). 

203 QUESTION NO.4 “TYPE TEST NO. TO BE EXECUTED” - RESPOND 
205 , BY TYPING THE-TEST NO: ’O-21° YOU WISH TO RUN. 

207 2. WITHOUT TELETYPE (OR OTHER TERMINAL) 

209 7 PROGRAM AT AD RODRESS 1204. ag THE PROGRAM 


elo mii THEN EXECUTE A SERIES OF 


ah al ale Wd 
BRACKETS, Th THESE Ha 3. are THEIR MASSOCTATED HALT 


A. HALT AT ADDRESS 001734 (1736) 


tururororurururufr 
= 02 2 = bo bo he 
WO NOUS Gru 


R 
220 nro 1 WaeD TO_ASK_YOU IF YOUR VT20 HAS A FOREIGN 
eel Rg IF SO SET THE SWITCH REGISTER EQUAL TO - \ 
sss at 1 Mtr NOT CLEAR THE SWITCH REGISTER) THEN PRESS CONTINUE 


ee4 B. HALT AT ADDRESS 001746 (1750) 


VTe0 avgren DIAGNOSTIC TEST PROGRAM MACY11 27(732) 14-SEP-76 10:32 PAGE S 
DBVTAC.P11 


SY 
‘ ALO IF voy 
S ote F 
OAl K sTHERUISE LEAVE 
ss. 
VIA SETTING SWIS=1, 


T TO BE USED, 
LL BE reg a "THIS 


WILL vy SECLENTIALLY 
INDICATED SO PAY HEED 
TO THE HALT ADDRESS - PLEASE. 


HALT AT ADDRESS 002010 (2012) 


ENTER FK VECTOR OF UNIT N INTO THE SWR. 
HALT AT ADDRESS O0e02e (2024) 


ENTER FK ADDRESS OF UNIT N INTO THE SWR. 
AT THIS POINT HALTS C AND D REPEATED FOR ALL TUBES. 
HALT AT cpa 002050 (2052) 


ENTER THE VT VECTOR OF TUSE N - INTO THE SWITCH REGISTER. 
HALT AT ADDRESS 002060 (2062) 


ENTER THE VT ADDRESS OF TUBE N INTO THE SWR 
HALTS E AND F REPEATED FOR ALL TUSES. 
HALT AT ADDRESS 002114 (2116) 


ENTER DL11 VECTOR ADDRESS FOR TUBE N INTO SWR. 


HALT G REPEATED FOR ALL TUBES. 
wat aT ADORESS 002136 (2140) 


eeeeee : 


AT THIS | HALT ENTER INTO ne SUR THE OCTAL NUMBER 
OF TESTED. (G 1,2,3 OR 4). IF 
oF TAY 4 yee ENTERED HE SWR: ALL UNITS WILL 
BE AUTOMATICALLY ALTERNATED AFTER PASS COMPLETION. 


HALT AT ADDRESS 002634 (2636) 
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THIS HALT IS FOR THE TEST NUMBER TO BE RUN. ENTER 
THE NUMBER AND PRESS CONTINUE. 


RESTART PROCEDURE 
JHE EEE 


PROGRAM SHOULD BE RESTARTED AT T 
las On Ter NY STARTED UNLESS A NEW 
THI PS foe SE TYPE 8 ’tA’ IF A TELETYPE 
AND RESTART THE PROGRAM AT LOCAT 


CONSOLE SWITCH SETTINGS 
REAR A AREER REEL EERE EERE R EERE EEEEEE 


A. . REFER TO THE INDIVIDUAL TEST DESCRIPTIONS FOR APPLICABLE 
*SWR’ SETTINGS. 


CONTROL SWITCHES (TELETYPE) 
RELKEEESREREKEAKESERKLSERAREE SE SLARALA RAE RFERAPRE ELE 


A. CONTROL <C> 
Lyre vite (OBTAINED VIA TYPING THE ‘CNTR’ & °C’ KEYS SIMULTAEOUSLY) 
AT TIME ENABLES THE PROGRAM TO RETURN TO THE KEYBOARD MONI Liccus 


core. ¢ 
YPING ta (OBTAINED VIA TYPING THE “CNTRL’ AND *A’ KEYS SIMULTANEOUSLY) 
Dk AY an ahr Ou fe OF THE we! feat RUN. 
HR EEE EERE REE ER EERE AEE REE ALAR ER EERE EEE EELS 


DESCRIPTION 


WWWWWWWIWIWIWUIG 
= b= 9 9 6 = os sb 
000 Uru eurM-ob 


8 


fe 


Sh 


VT WORST CASE 

VT CURSOR CONTROL 

VT ODD ADDRESS 
RUN-ALL 


oo 
—OVDONCTUWCW-Ow 


TUT 0 0 0 9 bo 9-0 pp 


BERS 


KBD LOGIC 

KBD SutTG & LIGHT 
KBD CHARACTER SET 
KBD REPEATIBILITY 


VT/KBD SYSTEM TEST 


Se 
Buen ToRCISSRRSBRES 


Bee 





VT20 SYSTEM DIAGNOSTIC TEST PROGRAM MACY11 27(732) 14-SEP-76 10:32 PAGE 7 
DBYTAC.P11 i . 


VT/KBD SUBTEST SELECTOR 22 
EXECUTION TIMES 


VT LOGIC TEST (0) 
SE ARSE SE FEES ERE EEE 


A. TEST DESCRIPTION 


THE *VT’ LOGIC rest CONSISTS OF *28" SUBTESTS WHICH EXERCISE 


a eC i eg 


N THE ’VT’ LOGIC TEST IS SELECTED OR MAY BE 
SELECTED SNOT VIDUAL Y BY THE FK/VT SUBTEST SELECTOR (REFER 
TO SECTION 27). AT THE END OF EACH SUBTEST THE *AUDIO BEEP’ 
IS SOUNDED TO INDICATE A NEW SUBTEST IS BEING EXECUTED. 


LOGIC ERRORS 


THERE ARE TWO ERROR REPORTING SCHEMES USED FOR REPORTING 
pioneer (1) WITH TELETYPE AND (2) WITH 


1. ON ENCOUNTERING A LOGIC ERROR (ALL DATA SWITCHES DOWN) 
THE FA TILING SUBTEST NUMBER ERROR ADDRESS. AND CONTENTS 
OF THE 'VT’ REGISTERS ARE TYPED OUT. T T 
ERROR FORMAT S USED, (A) NORMAL ‘VT’ LOGIC ERROR OR 
(B) ’VT’ SHIFT cocte. ERROR. 


(A). NORMAL ERROR FORMAT 


TST NO. PASS 
A B 


WHERE : 
A= FAILING SUBTEST NO. 
B= PASS ON WHICH ewes OCCURRED. 


C= ERROR ADDRESS ( Y ADDRESS) 
D= CONTENTS OF CONTROL & STATUS ADDRESS REGISTER 
E= CONTENTS OF MAINTENANCE ADDRESS REGISTER® 


#'SWR’ BITS *2-0’ MAY BE SET TO SELECT ANY ONE 
OF THE ’8’ ADDRESSES THAT CAN BE READ BACK VIA 
THE MAINTENANCE REGISTER. 


ADDRESS DATA SELECTED 


COMMAND AND STATUS REGISTER 
DATA ADDRESS REGISTER 

SHIFT REG. INPUT DATACEVEN ROW) 
SHIFT REG. OUTPUT DATACEVEN ROW) 
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Rigi EN REGISTER 
ADDRESS REGISTER 

REG. INPUT DATA(ODD ROW) 

G. OUTPUT DATA‘ ODD ROW) 


7 . BA —* at ws oes Regv'd 


WHERE : 
A= FAILING SUBTEST 
B= ERROR coe (MEMORY ADDRESS). 

N OCTAL ON WHICH ERROR OCCURRED (1-32). 


E 
E= EXPECTED DATA (SHIFTED IN 4 wala TABLE). 
F= RECEIVED DATA (CONTENTS OF ° 


PUG Sta PU Pe SE 
Moar REGISTERS WITH" ERROR ORTA AND HALT. THESE 
WAYS: (A) NORMAL 
foci TERROR BND (ey SHIFT L Eosic TERROR. 
(A). NORMAL LOGIC ERROR 


RO= FAILING SUBTEST NO 
Rl= PASS ON WHICH ERROR OCCURRED 


R2= ERROR AD Aa, 
R3= CONTENTS OF CONTROL & arate ADDRESS REG 


R4Y= CONTENTS OF MAINTENANC 


ADDRESS REG ¥(REFER ABOVE). 
SHIFT LOGIC ERROR i 


aie FAILING SUBTEST NO. 
l= PASS ON WHICH ERROR OCCURED 


Ro 
R3= FE SHIFT ad om ON rr: ERROR OCCURRED (1-100). 
R4= EXPECTED DATA (SHIFTED IN FROM THE SHIFT TASLE). 
| RS= ACTUAL CONTENTS OF MAINTENANCE ADDRESS RES. 
C. CONSOLE SWITCH SETTINGS FUNCTION 


NORMAL RUN [100 PASSES/TEST) 
SUPPRESS SUBTEST ITERATIONS 


CONTINUE SHIFTING ON SHIFT ERROR 
ABORT SHIFTING ON SHIFT ERROR 


SW13=0 PRINT ERROR MESSAGES 
SW13=1 INHIBIT ERROR TYPEOUT 
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SW14=0 NORMAL RUN 
SW14=1 LOOP ON CURRENT SUBTEST 


SW1S=0 CONTINUE ON ERROR 
SW1S5=1 HALT ON ERROR . 


VT *CHARACTER SET’ TEST (1) 
HERI REE HEHEHE IEEE REE EERE ER EEE 


A. TEST DESCRIPTION 


ING & BLANK 
IS DISPLAYED FOR 
ited is IS 


DISP HE DISPLAY BUFFER IS SET UP SO THAT EACH LINE 
(EXCEPT THE wit LINE) IS TERMINATED ay pI THER VISTELE *END 
OF LINE’ VISIBLE "END OF PARAGRAPH’. THE LAST LINE IS 
TERHINGTED WITH *VISIBLE END OF OF SCREEN? bvEN THE ENTIRE 


REEN HAS BEEN FILLED THE TEST IS RESTART 


NOTE: THE CHARACTER SET MAY CONTAIN BLANK SPACES. THESE ARE 
CODES RESERVED FOR FUTURE SPECIAL TYPESETTING CHARACTERS. 


B. CONSOLE SWITCH SETTINGS FUNCTION 


NORMAL _RUN 

INHIBIT DISPLAY DELAY 

NORMAL _RUN 

ADVANCE TO NEXT# 

NORMAL RUN 

HOLD ON CURRENT CHARACTER 
*THIS ADVANCE WILL ONLY TAKE PLACE AFTER THE CURRENT 
TEST HAS BEEN COMPLETED. 


VT *FIELD CONTROL?’ TEST (2) 
HERE HEE REA HERR ER EEE REE REE REELS 


A. TEST DESCRIPTION 


THIS TEST DISPLAYS THE ‘VT’ wage SET ve x - FIVE 


"FIELD CONTROL’ MODES: NORMAL BOLD 
UNDERLINE. THE TEST BREAKS Ls KHARACTER act into THREE 
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PARTS. EACH PART IS THEN DISPLAYED IN ALL °S’ MODES. 

rele FNAL ER bm LAER TO VIEW EACH CHARACTER IN A STRAIGHT 
LI N Y 

CONSOLE SWITCH SETTING FUNCTION 


= NORMAL _RUN 
SWl2=1 ADVANCE TO NEXT TEST 


"CSR PRESET’ FEST CB) 


KLALARLEARRLAKLL ALL AKELALLELLEEELELAELLEE 


A. 


TEST DESCRIPTION 


THIS TEST CONSISTS OF FOUR (4) PARTS. EACH PART DISPLAYS 
AN ENTIRE SCREEN OF THE 'VT’ CHARACTER SET USING A *CSR’ 
PRESET FUNCTION. THE ELECTED PRESET FUNCTIONS IN ORDER 
ARE: BOLD, BLINK, BL UNDERLINE. AN IDENTIFYING 
MESSAGE WILL PRECEDE EACH PART. 

CONSOLE SWITCH SETTINGS FUNCTION 


SWi2=0 NORMAL RUN. 
SWl2=1 ADVANCE TO NEXT TEST# 


SW14=0 NORMAL RUN 
SWi4=1 HALT ON CURRENT PRESET 


"END OF LINE* TEST CY) 


HLLAALALA RA LRALHEALEE AER LER LELLLRLL ERATE 


TEST DESCRIPTION 


THIS TESTS THAT THE ‘VISIBLE END OF LINE’ CHARACTER CAN 
BE PLACED IN ANY OF THE *1024%’ CHARACTER 


POSITIONS ON THE 
SCREEN. THIS IS DONE BY START! NG INES WITH A 
VTS a is END OF HARACT: 
CHARACTER 


S ACROSS THE SCREEN. AS 
MOVED AN ASTERISK IS DISPLAYED IN ITS PLACE. 
CONSOLE SWITCH SETTINGS FUNCTION 


NORMAL R 
INHIBIT DISPLAY DELAY 
NORMAL RUN ; 
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561 SW12=1 ; ADVANCE TO NEXT TEST 
563 ; : Sw14=0 NORMAL RUN 
Bb SW14=1 HOLD CURRENT EOL’ POSITION 
567 % THIS ADVANCE WILL ONLY TAKE PLACE AFTER THE CURRENT TEST HAS 
568 BEEN COMPLETED. 
569 
570. 
571 
572 
573 
574 14. VT "END OF SCREEN’ TEST (5) 
a7e HFXHSFEESELALE FLL ALE RARE L ELLE RA LEA AHA ALEAEEKEE 
ta A. TEST DESCRIPTION 
en Reis ae . TEST DESCRIPTI 
581 THIS TEST TESTS THAT THE *VISIBLE END OF SCREEN’ CHARACTER 
5 ‘ CAN BE P Laced IN ANY OF THE * 1024’ CHARACTER POSITIONS ON 
5 _ THE CEREEN. THIS IS DONE BY FIRST 
584 BUFFER WITH QUESTION MARKS (THESE WILL UB ISP tA YED If 
58s THE EOS IS SKIPPED). THE EOS’ CHARACTER IS THEN INCREMENTED 
586 THRU THIS BUFFER REPLACING THESE QUESTION MARKS BEHIND 
587 THE °EOS’ WITH DOTS. 
583 B.° CONSOLE SWITCH SETTINGS FUNCTION 
591 SW11= NORMAL RUN 
32 SW1l=1 INHIBIT DISPLAY DELAY 
594 SW12=0 NORMAL RUN 
o35 | SWle=1 ADVANCE TO NEXT TEST 
597 ; SW14=0 NORMAL RUN ! 
38 SW14=1 HOLD CURRENT °E0S’ POSITION 
500 
601 15. VT "BLANK CONTROL’ TEST (6) 
Pps LHESKRELA LER ALES EEA SESE ELH E RE EEL AER ESESRLERRE 
, 604 
605 A. TEST DESCRIPTION 
ope BEAN ONE oh hare pameneronmeres 
608 ‘THIS TEST TESTS THE "BLANK? FIELD CONTROL LOGIC. BY 
609 INCREMENT THE 'BLANK’ CONTROL CHA RACTER THRU A BUFFER 


ASTERISK “CHARACTERS. THE TEST STARTS eae THE BLANK 

CONTROL CHARACTER AT THE START OF THE *VT’ BUFFER. THE 
CREEN SHOULD START OFF to AND AS THE BLANK CONTROL 

I TED THRU THE *VT’ BUFFER ASTERISKS 
LL_START APPEARING ON A THE SCREEN. THE TEST WILL RESTART 

AFTER THE ENTIRE SCREEN HAS BEEN FILLED. 


OOrrwrnwno 
ob bh 
TrmcWwrUeO 
eae" 2 
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B. CONSOLE SWITCH SETTINGS FUNCTION 


Wills NORMAL RUN 
Wil=l INHIBIT DISPLAY DELAY 
Swiz=0 NORMAL R 
SiWle=i ADVANCE +0 NEXT TEST 
Swi4=0 NORMA ‘ 
SWi4=! HOLD L UBSENT BLANK POSITION \ 
16. VT "ALIGNMENT’ TES 


TSSELLTARFARAFEARFALLLRESLLFLELFRELAELALSE 


A. TEST DESCRIPTION 


THIS TEST DISPLAYS A FULL SCREEN or ty CHARACTER °E* TO 
ENABLE A VISUSL ALIGNMENT OF THE ° 


8. — SWITCH SETTINGS FUNCTION 


0 NORMA 
l : ADVANGE 10 NEXT TEST 


iv. VT *FOCUS* TES FT Cio) 
SRERLELERPRELLRARELEA ARTA LE SESS 


A. TEST DESCRIPTION 


“THIS TEST DISPLAYS A FULL SCREEN OF glia tt § verdana 
AND ONE’S TO ENABLE A VISUAL FOCUS OF THE * 


8. CONSOLE SWITCH SETTINGS FUNCTION 


SW12=0 * NORMAL RUN 
SWl2=1 ADVANCE TO NEXT TEST 


1é. v7 RST CASE’ TEST (82) 
suseunuscsusecsauesosersdusauaetesesteess 


A. TEST DESCRIPTION 





4 DEVTAC 
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CONE Sg EAS tas ete Pigs) int a.) eS sel reer, 
$74 
$75 THIS TEST DISPLAYS A FULL SCREEN OF THE WORST CASE 
fe CHARACTER PATTERN *125 8 252’. 
9 NOTE: CODE 125 WILL DISPLAY A ae AND CODE 252 WILL DIS- 
$79 PLAY EI THER 6 A SPECI YPESETTING CHARACTER, 
. eC THIS BEING DEP BENT ON THE CH ActE 
Ss B. CONSOLE SWITCH SETTING FUNCTION 


$84 
gS SW12=0 NORMAL _RUN 
£55 SWl2=1 ADVANCE TO NEXT TEST 











19. VT "CURSOR CONTROL’ TEST (12) 





£30 
63! PEERS REEREREEEEEEREEE ERS ER EE ECESFEEAREE SEAR ES ES EES 
£32 
&33 








£94 A. TEST DESCRIPTION 





597 3 THIS Test TESTS THAT THE CURSOR CONTROL CHARACTER CAN BE oe 
+ BEd ‘ker? cca EEN. THIS. 18 DONE & Y OISPLAVING 6 a "CURSOR EGS” AND. IN- | 
523 Sehicth pee R OF QUESTION MARKS. 
701 THE CURSOR CONTROL RRARACTER & MOVED ALONG ASTERISKS 

? Bee FETE URSOR CHARACTER. WHEN THE TEST IS 
703 BRRPLETE THE ENTIRE SCREEN SHOULD BE FILLED WITH CETERTSKE 
708 AND WITH NO QUESTION MARKS VISIBLE. 

298 B. CONSOLE SWITCH SETTINGS | FUNCTION 

708 Suis NORMAL RUN 

208 Swil=1 INHIBIT DISPLAY DELAY 

rat Suiz= NORMAL _R 

zi SWle=! ADVANCE T9 NEXT# 

714 Sw14=0 RMAL RUN 

zis Sul4=1 HOLD ON CURRENT CHARACTER 

le 

717 + THIS ADVANCE WILL ONLY TAKE PLACE AFTER THE CURRENT TEST HAS 
712 BEEN COMPLETED. 

715 

736 

72} 

1 20. ¥vT 'ODD AD TEST (13) 

re; : ‘ . STARSSSSARELSRSSSKRTAFSRELSAARAKLAAKLATSRSAES 

o5c 

726 A. TEST DESCRIPTION 

DOP PoRSts SLING. trace EN UR NET, 7 Yo vat rememeiatatate 














VTEO SYSTEM DIAGNOSTIC TEST PROGRAM 
DBVTAC.Pil 


Bene Se 


3 








MACYL1 27(732) 14-SEP-76 10:32 PAGE 14 


THIS TEST SIMPLY DISPLAYS A ton * 2 WHICH IS LOADED 


baw AN RO 2 BRTING A Pret onp OED FRR BHRULO 


STARTING ADDRESS. HOW DOES IT LOO 





él. VT *RUNALL’ TEST (4) 
RRHHRE RARE EERE EEE REE EEE EEE EEE 


A. TEST DESCRIPTION 





THIS TEST ENABLES TE 
IF A *4’ WAS SELECTE 


3 3,15’ TO BE RUN IN ORDER. 
WILL GE RUN SEQUENTIAL 


S "0-1 
AS THE TUBE NUMBER, THESE TESTS 
LY ON ALL AVAILABLE TUBES. 


22. ASCII KBD *LOGIC’ TEST £15) 
REARLELERERAEAA ERA LEREERERREEEEE EELS RE SELES EE 
A. TEST DESCRIPTION 


THE *KBD’ LOGIC TEST CONSISTS OF 19’ SUBTESTS WHICH 
EXERCISE AND DIAGNOSE THE *KBD’ LOGIC. EACH SUBTEST 

IS L ’ TIMES TO TEST LOGIC RELIABILITY. 

THESE FESTS ore RUN AS A UNIT WHEN THE ’KBO’ LOGIC TEST 
IS SELECTED BUT THEY MAY ALSO BE SELECTED INDIVIDUALLY 
BY THE *FK/VT’ SUBTEST SELECTOR (REFER TO SECTION 27). 

HE _* KBD’ ERIC TEST DOES *NOT” CHECKOUT THE LIGHT AND 
KBO FUNCTION 


sutToN Lean + Hig, LE LOGIC Kody | BY THE *KB 


8. RESTRICTIONS 


THE ’VT’ LOGIC MUST BE OPERATIONAL AS REQUESTS FOR 

*KBD’ ta sides INP pik rt REQUES ue aXe MESSAGES DISPLAYED 
ON THE ’ bee TAKEN THAT ONLY ONE Key SE 
STRUCK ERC ie His OREOU ST 15 MADE” TO AVOID FAL 

ERROR INDICATIONS. 


C. LOGIC ERRORS 


RE ARE TWO ERROR REPORTING SC USED FOR REPORTIN 
ior LOGIC ERRORS. (1) WITH rece (2) WITH PROGRAM 


THE FAILING SUBTES 


.. oN ENC UNTERING ) Loc c ERR Re {A Rok Bate aie COWN) 
CONTENTS OF THE "KBD" Rese eRe” ARE OF 


OUT 
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Sones 


Bw 


MOwmwowwowMmMmqma rw 
0 <0 0 0 = = 8 2 
WONYOUICWi--O 


SEND ees 


831 
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ERROR FORMAT 


TST NO. PASS MA CSR DATA 
A B C E 


ERS 
= FAILING SUBTEST NO. 
Bs PASS ON WHICH ERROR 


= CONTENTS 0 


C= ERROR AQOF ES? (MEMOR 
CONTROL : 
= CONTENTS OF DATA ADDRE 


es 
ADDRESS) 
STATUS ADDRESS REGISTER 
SS REGISTER. 


é. on ENCOUNTERING A LOGIC ERROR (DATA SWI Re UP ) 


THE PROGRAM LOADS 


THE FOLLOWING ERROR 


RO= FAILING hoy fa 
Rl= PASS ON WHICH 
Res FAILING ER 


My eae bh egrsien WITH 


NO. 
ERROR OCCURRED. 


ROR 
R3= CONTENTS OF CONTROL & STATUS REGISTER ADDRESS 
R4Y= CONTENTS OF THE DATA ADDRESS REGISTER. 


D. CONSOLE SWITCH SETTINGS 


23. ASCII KBD 'LIGHT 


FUNCTION 


REQUEST KEYWARD INPUT 
INHIBIT KEYWARD INPUT REQUEST 


SUPPRESS. suatEST TTERATIONS. 
PRINT ERROR MESSAGES 
SUPPRESS ERROR MESSAGES 
NORMAL RUN 

LOOP ON CURRENT SUSTEST 


CONTINUE ON ERROR 
HALT ON ERROR 


CH’ TEST (16) 


& SWIT 
POFEPETET ET EET ET ETT TT tT Tete Teeter erereretTeteree eet eter ert ttt 


A. TEST DESCRIPTION 


THIS TEST IS USED TO CHECK OUT THE KBD FUNCTION LIGHT AND 
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RS 


A a 


TO SWITCH TO HE NEX xt ie RUNALL IS SELECTED) 
TYPE tC ON T 


SCII KBO “CHARACTER SET* TEST (17) 


A 
LHAARERALAL AA LEELA TAARAERLRAA LALA ALLL ELAAAL LALA ARE RALAELERLAREE 


A. TEST DESCRIPTION 


O44 
es 
at 
Q 
843 
850 
S 
8s+ 
sss 
856 
gs7 
gsg 
gs3 
869 
861 
ers 
- 864 
865 _. 
BEE - 
8&7 
8&8 


THIS TEST IS ALSO AN OPERATOR INTERVENTION TEST. IT_IS USED 
TO VERIFY THAT ALL CHARACTERS CAN BE TRANSMITTED BY THE 
KEY . THE TEST rene THREE Orie Te PASSES 


HAND CORNER OF THE KEYBOARD AND E 
CHARACTER IS TRANSMITTED FROM THE KEYB 
AGAINST A CHARACTER BUFFER AND DISPLAYED ON THE ’ 


, 


IF THE TRANSMITTED CHARACTER CODE DOESN’T MATCH THE 
EXPECTED CHARACTER CODE THE AUDIO *BEEP’ IS SOUNDED AND 
_ THE RECEIVED CHARACTER IS DISPLAYED IN *BOLD-UNDERLINED’. 


CONSOLE SWITCH SETTINGS satan 


NORMAL R ; 
LOOP ON THE CURRENT CHARACTER 


SW1S=0 | LOOP UNTIL CORRECT CODE RECEIVED 
SW1S=1 . SKIP BAD CHARACTER 


NOTE: FOR PROPER OPERATION SW1S SHOULD BE _RE-SET TO °0° 
AS SOON AS THE NEXT CHARACTER HAS BEEN INPUTED. . 


PREC ES SRE 
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$84 B 


RIG 


SCII KBD ‘°REPEATIBILITY’ TEST (2) 
SR AR SEE HE EERE EEE ESE AR EEE GR AE EEE AE REE ERE AEE EE AEE EE a HEE ER 


A. TEST DESCRIPTION 


THIS. TEST 5 ALSO aN OPERATOR. INTERVENTION TEST. THE TEST HAS 
UNCTIONS. ITC UP FOR THE ’ CHARACTER 
sett "TEST TO. fe T aNTONE™ ae CODE OR, SECOND 
Y ‘ F 


3 


0 TEST KE PEATIBILITY BETWEEN ANY TWC 
SELECTED” CHARACTER 


STARTING SEQUENCE 


\! 
THE TEST VERIFIES UP \. TWO CHARACTERS RECEIVED FROM THE wi cy 
AGAINST THE CHARACTER CODE(S) LOADED BY THE OPERATOR. 
THESE CHARACTER CODES ARE LOADED ONE OF TWO WAY, (1) VIA 
“TELETYPE OR (2) VIA *SWR’ ON PROGRAM HALTS. 


OOD O00 OW 
0 b= 02 b= 6 00 9 bp 
WOW UL£CWre 


(25. CONT) #é er 
TYPE: NNNI,NNN] (CR) (I.E. 101,141 UPPER CASE A AND LOWER A) 7 


WHERE : 
NNN IS THE CODE(S) TO BE VERIFIED. abl. 


Pale 
< Se 


829 
$21 
Se2 
S23 
S24 
S25 
92é 
$27 
928 
329 
$30 
931 


LOAD THE CODE OF THE SECOND C 
*SWR*, OTHERWISE JUST PRESS CONTINUE. 
ERRORS 


ee 


IF_THE TRANSMITTED eM CODE DOESN’T MATCH THE 
EXPECTED CHARACTER CODE THE AUDIO "BEEP’ IS SOUNDED 
AND ahese EIVED CHARACTER IS DISPLAYED IN "BOLD- 


PEL 
Gru 


VT20 SVYSTER TEST (2) 
RARE EERE REE AG EER LARA REAR ERE EER EEEE 


BES SaaE 


A. TEST DESCRIPTION 


at 
ul 
_ 









dala 


Prana tt aie ERE 


$99 
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SEPA PREP PRES IRR RR 3 








IS TEST IS DES are T9 eee I VT20 IN A SYSTEM 
Tree OF ENVIR THE TE re He SF psy TER 
SYSTEM ( URGES) tN CONS WI 


HOST’ 12 TO Be CABLED. vis ie CINE INT EREACE 10. fie vie VTe0 
SYSTEM. ONE INTERFACE es REQUIRED FOR EACH UNIT. 


THE HOST DI CE 1-D2VTE(FOR A PDP-11 
T WLS), o- li ent A MGI A Bope ti HOST W/DH11°S) 

OR MD-O8-DIVTB (FOR A Pop-8 HOST W/KL8J'S) MUST BE LOADED 

AND RUNNING BEFORE” ATTEMPTING TO DATA VIA THIS TEST. 


THE HOST OfacnOstIC KILL ge DseuaveD. This Fessace 


WILL T Y BE REPLACED WITH A TUBE STATUS 
Wetter IN TH THis R WILL BE DISPLAYED: NO. OF CHARACTERS 
ON THE ncreEN F CHARACTERS. RE CEIVED FROM THE 

HOST, OF BL bok OF ERRORS ENCOUNTERED. 


THIS’ Message ALSO NOICATES TH THAT ATH EST IS READY. 


AS CHARACTERS ARE RECEIVED FROM THE ASCII KEYBOARD, THEY 

THEY ARE TESTED FOR BE NG PROGRAM CONTROL CHARACTERS, 
THEY BRE ATED AS DATA AND DISPLAYED. ’ THE 

“thes ACCEPT UP TO 384 DATA CHARACTERS OR 6 






COMPLETE 





oR At (ti). THE (tA) WILL ENABLE FOR A INCREMENTAL CHARACTER 
THE CHARACTERS UNTIL THE 


IS F WILL ENABLE FOR A WORST 
fase ih OF "125-252" TO MBE PRODUCED UNTIL THE SCREEN 


TRANSMITTING MODES 


THERE ARE TWO MODES USED TO TRANSMIT DATA TO THE HOST 
COMPUTER: SINGLE TRANSFER OR CONTINCUS TRANSFER. 


A SINGLE TRANSFER IS INITIATED BY TYPING Ag ae AFTER 
uy 3 DATA HAS BEEN INPUTTED. ON RECIVING THE ALTMODE 
NPUTED DATA I TRANSEERED TO THE HOST COMPUTER. 
BUFFERED THERE AND TRANSMITTED BACK. TO THE VT20 
HE END OF PARAGRAPH. RY AR 
DISPLAYED BELOW THE ORIGINAL DAT 
G THE DATA THE OPERATOR MAY TYPE ‘fC’ TO 





he 
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aa THE SCREEN sn RESTART THE TEST OR START A CONTIN- 
OUS TRANSFER. “ 


Neu ARH ORE FTE be OPERATES IN THe 
BATA BACK BACK Front COMPUTER Tt T xeon fe 


"NOS 
TESSPEL Ded TA ces? ater the Le Sec ST 


T IN THE FORMAT OF: 4 NULL CHARACTERS 
HARACTER (377), DATA (ORIGINATED 
PARAGRAPH CHARACTER (14). 


8 


GOIRREERES FB 


0 b-+ 0 b-— b= & < 9 9 op — 0 ~~ 9-1 9 > 
oQ0ogd 


Q00UK000 
WON UL WTO 


C UNDERLINED’ . 
THIS ERROR WOULD ALSO BE RECORDED IN THE ERROR HEADER. 


‘eu CHECKING CAN BE_INHIBITED BY SETTING DATA *SWOO’ TO 
*(UP). ALL DATA THEN RECEIVED FROM THE HOST COMPUTER 
. THIS SWITCH SHOULD ONLY 
OMPUTER IS ORGINATING DATA USING 
SEND MODE (REFER TO THE HOST DIAGNOSTIC). 


THERE IS ALSO ANOTHER OPTION AVAILABLE TO THE USER 
RUNNING WITH MD-11-DZVTG.: 


SWOO & CAN BE SET. TH ENABLE THE DATA 
Brine RECEIVED FR FROM THE Host lit BE DISPLAY reD IN 
THE DATA WILL ALSO BE E BACK 
HOST: THIS, OPTION IS USED WHEN RUNNING THE HOST. VERIFY 
TEST. REFER TO MD-11-DZVTG FOR FULL DETAILS OF THE TEST. 


i A TRANSFER 1S INITIATED AND FOR ONE REASON OR ANOTHER IT 
RILS TO RE URN BACK T 0 THE VT20, THE TEST WILL APP- 
AR HUNG SINCE NO KEYB COMMANDS WILL BE RECOGNIZED. IN THIS 
RACE AND ONLY IN THIS eee Cope "tE’ TO ESCAPE THE TRANSFER 
MObE AND RESTART. 


IF *tE’ IS TYPED IN THE MIDDLE OF A TRANSFER, IT 
WILL CAUSE MULTIPLE RECEIVER ERRORS. 


CONSOLE SWITCH SETTINGS FUNCTION 


HALT \ AN 
VERIFY RECE 
#*INHIBIT VERIFING RECEIVER DATA 


1 
1 
:a 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 


 APRRRBSESERISS TSEC E OR OS SOON TRS 
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1056 SWOO & SWO1=1 #4#4DISPLAY RECEIVED CHARACTER IN 
1057 OCTAL FOR AND ECHO IT BACK TO 
1 THE HOS 

t 

ibe? ® SW1S APPLIES TO CONTINOUS TRANSFERS ONLY AND THE 

1068 HALT WILL OCCUR AT THE END OF THE CURRENT TRANSFER. 

1083 e+ THIS SHTTOH MUST BE’ SET IF THE HOST IS TRANSMITTING 

ie? Pee pare Batts ee SHOULD ONLY BE USED WHEN RUNNING THE 

1068 VERIFY TEST OF MD-11-DzvV 






O68 
1069 | (26. CONT) 
1071 fe D. ASCII KRB CONTROL SWITCHES 









i074 i KEY FUNCTION 
oe oa --- -----=-- 






1076 
1077 ; RUBOUT DELETE LAST CHARACTER. 
1078 AL TMODE INITIATE SINGLE TRANSFER. 
ie i tA (CTRL A) cay “yi INCREMENTAL CHARACTER SET. 
1 tT (CTRL T): ENABLE/DISABLE CONTINUOUS TRANS. 
1081 tW GENERATE WORST CASE — PATTERN 
1082 tC (CTRL C) CLEAR SCREEN AND RESTAR 
ines tE (CTRL E) #ESCAPE AND RESTART 
1085 * USE WITH CAUTION AS NOTED ABOVE. 
; - ERRORS 








088 

1089 TO INDICATE TRANSMITTER, RECEIVER AND KEYBOARD ERRORS THE 
her FOLLOWING CHARACTERS WILL BE DISPLAYED USING THE BLINK MODE. 
1092 CHARACTER MEANING 











4 
K 

1096 T ILLEGAL TRANSMI 
1097 R ILLEGAL RECEIVER IN 
1098 - Q DL11 RECEIVER OVERRUN’ ERROR 
1099 F DL11 ReKet VER *FRAMING’ ERROR 
iim P DLI1 RECEIVER *PARITY’ ERROR 
1102 ; 
1103 
1104 
1105 
1106 27. VT/KBOD SUBTEST SELECTOR (22) 
ie? SEEGGESATEEAAESTETALAGADEREASETETAGASAEEEOSOTTE 
i103 
rit — A. TEST DESCRIPTION 
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“Du 
—-—4 
—Fmr" 





—- << 
—- + 


02 02 b+ b= = ph pe 
000 “ICPUN Tu Buy 


TATE ree bere D aie TO ALLOW THE OPERATOR TO LOOP 
OR ‘VT’ LOGIC SUBTEST WITHOUT 
RUNNING THE ENTIRE Poate TEST 


B. STARTING SEQUENCE 


THIS TEST ACCEPTS AN OCTAL ADDRES 

CUTED. THE PROGRAM THEN SETS 
EXECUTES THE Frc reD se ES 
TS LOADED ONE OF TWO WAYS, (1) V 
*SWR’ ON PROGRAM HALT. 


WHEN SELECTED THE PROGRAM WILL TYPE THE MESSAGE *TEST ADDR.?’. 
THE OPERATOR SHOULD THEN TYPE IN THE *SCOPE ADDRESS’ OF THE 
TEST TO BE EXECUTED. 


' 2. WHEN THE TEST iS SELECTED THE PROGRAM WILL HALT. LOAD 
THE S OF THE TEST TO BE EXECUTED INTO THE 
*SWR’ AND PRESS CONTINUE. 


C. RESTRICTIONS 





S OF A *SUBTEST’ TO BE 
UP T ue Une PARAMETERS 
as 1 ee RESS 
IA TELETYPE OR (2) VIA 


& 


mu 
-“~ 
3a 


0-+ b +b -+ b+ 9-2» 6 = p= p= 9 ~~ pp 


—s 
. 


SRR OH BBS SRR EO 


DATA “SW11" MUST BE DOWN [0) TO INHIBIT THE PROGRAM FROM 
face IN THE SELECTED TEST AND CONTINUING THRU THE LOGIC 


REFER TO THE RESPECTIVE °KBD’ OR ’VT° ERROR SECTION. 


29. EXECUTION TIMES 
: HRELEAELELELERL ELE LELALA RATES 


ALOR be aah Ei 





0 — b+ 6 = 0 b= bb = b*  -  0 0  * 0 0 0 0 -* 2 B22 2 0 - 0 0 9 tb — bo 0 bh 2 = op  -e 


TEST PASS TIME. NOTES 
0 7.5 MINS t 
l MINS C 
2 /A x 
cg 3 SECS 
53 4 25 SECS 
£0 5 & MINS 
61 € & MINS 
be ? N/A * 4 
63 <r N/A * 
64 ll N/A 2 
gs le & MINS 
£6 13 N/A + 
£7 “14 TOTAL OF ABOVE + TEST 15 





O— 0+ 2 Ob Os bb 2 6 bb = 0 8 0 2 8 hh ob 2 bo = 2 bh bo 9p hh 0-- b= b-+ b= 6 & > 0 <2 & © pH 9p wp 
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15 
1 
1 
2 
e 
+ 


IN RUN-ALL (TEST 14), THESE RUN FOR 3 SECS EACH. 


b= b- & =p b+ pp 


RRP RRORIS Iola SdaoS . B 


<£) cid Ld ck) ch9 AD oD 0D cL) cED CRD DCE CED CRD CHD CHD CED CEE ed wed med cd 
“NI 


BBVA LHS. 


eee 
% 
:MAINBEC dye oe tnen-b DIAGNOSTIC TEST PROGRAM 
COPYRIGHT SEPTENBER ° 1974, 1975 


REVISE’ 
DIGITAL EGUIPRENT? CORP. MAYNARD MASS. 01754 
PROGRAMMER: EARL L. BOUSE/ED BADGER 


;SWITCH REGISTER DEFINITIONS AND FUNCTIONS: 


gW1S=100000 HALT ON ERROR 
SW14=40000 LOOP ON CURRENT TEST 
si13=20000 as, ERROR TYPEOUT 
2=10000 HALT SHIFTING ON SHIFT aca 
SUPPRESS *SUBPROGRAM’ ITERATIONS 
INHIBIT ASCII KRB MANUAL INTERVENTION 


be bs he ho pe 
-—-weewe 


8 


1 
1 
1 
1 
1 
-l 
b 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 


fore 
form 


Benes 


B 


Posi 
s INSTRUCTIONS DEFINITIONS 
FKCSRY=%44 


YTCSRY=%4 
VTMARS=%5 


tururofrorururururuoror 
ee 
WOnwmun CWO 


= b= bs pan Bae fe Bs 2 a he 
Sey 
wre 
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POP1SP=S726 


\ 


INITTY 
NOTTY 
JMP INITBA 


; TRAP EQUIVALENCE TABLE: 


ERROR=TRAP 
OF a ale 
sEMT+ 


HE 
BINDEC=ENT+24 


;ERROR TRAP REPORTER ROUTINE 
;POWER FAIL HANDLER 


;EMT TRAP, EMT DISPATCH SERVICE 
;TRAP TRAP, LOGIC ERROR TRAP 


; TELEPRINTER KEYBOARD ROUTINE 


;PROGRAM STARTING ADOR. IF TTY AVAILABLE. 
; PROGRAM STARTING ADDR. IN *NO’ TTY. 
PROGRAM RE-START ADDR. TO SELECT NEW UNIT. 


3LOGIC TEST ERROR ROUTINE 

;’ VT’ MESSAGE DISPLAY ep bb 

LOGIC TEST SCOPE SUBROUT 

; SUBROU ue fT TQ SAVE *RO-RS’ ON STACK 
; SUBROUT tay De ay RS’ FROM STACK 


Y A KEYB 
A & DIGIT OCTAL_NO. 
MLE eels INTO OCTAL VALUE 


PRI 
T 7 FOR KEYBOARD FLAGS 
A LONG DISPLAY DELAY 
T FOR VERTICAL SY 
MIT A NULL PRINTER CHAR. 


ND OF DISP. TEST 
CONVERT *BCD* TO DECIMAL 


sama 
VocooooooooS 
Dvr 


oO 
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DBVTAC.P11 
1280 ¢ REAAALE RA LAARAAELLLL ALLEL LAL ARE REEL RELAAR ALLA RE LLERERLLLEL LLL RE RELERELELER 
i552 sEMT BERT OF ERT Te xTRaCTeD AND USED AS OFFSET TO OBTAIN POINTER 
1585 :PRCUNE NT PE EES Si OUT INE 
ise gE HE HH HEHEHE HHH HEHEHE HEHEHE EEE EEE ao 
1 ' 
1 1 =120 : 
1287 901200 Gliese EMTSRV: fo (SP) a5 (SP) sGET oee FOR TO RETURN 
Tt P ° . 
1 BET SDE Acie BB8008 be a(SP), (SP) iDET EMt 
1290 OOlel2 O0S716 TST - (SP) :IS EMT VALID? 
1291 001214 901001 BNE . EMTOK 
1232 po 1216 090009 HALT s INVALID EMT 
i5ay Qoise? OMS71e 17700 wee oe ln co ee a 
a ’ 
1 SptSSe pessip har ou ie BEMTTAB, (SP) POINTER TO CEO RIT INE ADDRESS 
1296 O0le32 017616 O00000 MOV a(SP), (SP) : SUBROUTINE ADDRESS 
1837 001236 000136 a(SP)+ GO TO SUBROUTINE 
1299 sEMT DISPATCH TABLE 
4301 001246 017246 EMTTAB: VTMES ;’VT’ MESSAGE DISPLAY ROUTINE 
1302 001242 Oc02b6 SCOPEC "LOGIC TEST SCOPE ROUTI 
1303 001244 Ol6i22 XSAVRG :SUBROUTINE TO SAVE *RO-RS’ ON 
1304 90124 016176 XGETRG ; SUBROUTINE TO GET ’RO-RS’ FROM ar RCK 
1305 001250 015540 XDELAY ROUTINE TO SETUP 3 SEC. DISPLAY DELA 
13068 001252 O15656 XEOSBF ey BROUTINE TO LOAD VT BUFFER W/ VISIBLE. EOS’ 
1307 001254 015732 ; XENDT SUBROUTINE TO CHECK bata SW.’S 
1308 001255 017024 XSTLNE :SUBROUTINE TO SET UP A ’VT’ BUFFER LINE 
1309 001260 Ois63e XLDLNE *SUBROUTINE TO LOAD A °VT’ BUFFER LINE 
1310 001262 016252 XPRELD -SUBROUTINE TO PRE-LOAD THE DATA BUFFER 
1311 O01264 014754 TYPMES :SUBROUTINE TO PRINT ASCII ME 
1312 6001266 014350 XTTYIN :SUBROUTINE TO INPUT VIA KEYBOARD 
1313 001270 O1s056 OCTPRT :SUBROUTINE TO PRINT A 6 DIGIT OCTAL NO. 
1314 001272 017104 XASEMB >SUBROUTINE TO ASSENLE CHARACTERS INTO OCTAL VALUE 
1316 001274 014276 XSPAC j SUBROUTINE 19 PRINT SP ACES 
1316 001276 014330 TKSFL SUBROUTINE TO TEST FOR KEYBOARD FLAGS 
1317 001300 oissso XDLAYL ;SUBROUTINE TO SET UP LONG DISPLAY DELAY 
1318 001302 015476 XWAITS *SUBROUTINE TO WAIT FOR VERT. SYNC 
1319 951308 017360 —«C«ry. XNULL SUBROUTINE TO TRANSMIT A -*NULL’ CHAR. 
1 O1 015726 XTHEND 
1321 001310 O16S46 XBINDEC ;SUBROUTINE TO CONVERT ‘BCD’ TO DECIMAL 
1323 REGISTER ADDRESSES 
1325 001312 177776 PSW: 177776 ;ADDRESS OF PROCESSOR STATUS REG. 
1326 001314 177560 TKS: 177560 -  GADDRESS OF KEYBOARD STATUS REG. ~ ° 
1327 001316 177562 TKB: 177562 : BUFFER 
1328 177564 TPS: 177564 : " PRINTER STATUS REG. 
001322 177566 TPB: 177566 ; ™ PRINTER BUFFER REG. 
1330 001324 177570 SWR: 177570 . . ; “ ”™ SWITCH REG. oh 
1331 001326 177571 SWRO: 177571 , *¢ @ "HIGH BYTE 
133¢ -*FK’ UNIT 0’S REGISTER ADDRESSES. 
1334 001330 170330 FKOLDB: 170330 "ADDRESS LIGHT DATA B’ 


UNIT 
UN 


OF O°S *LI 
1335 001332 170332 FKOLDA: 170332 _~—C«. | ADDRESS OF UNIT O°S *LIGHT DATA A’ 














4 

—< 
“Din 
z 
uw 


8 =m 


0-0 -— +9 


GIGIGILS 


mi?) 


je 
~4t9 


O-- > +0 + bb <0 -+ 0-2 & + 0-2 6 + 6 2 0-6 + 6-+ 0— b+ +0 <6 <B-- 0-- 8-2 20 +0 ©—-- 0 <6 <-0 +0 + 0-0 +0 0 2b > + - p< § <p © -_ 


TE Buy 
oom 
Ore 


Petar 
Mom 


eee 


reer et 
0D IOUS. 
BS8BR8 


B 


Gd) 
uw 
o-- 


RDO 


tad 


init 


Behe 


ys 


o 


a ae Ia bas 


“J 
Zante ow 


coe SSS 


dette 
CORD UBED EDD 
WDNWOU +s 


2 + 2 &—= & 2 & 2 b+ = = 8-2 Bo Be 
Cuca 


2B 


- 
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EKOCSR: 170334 sADDRESS OF UNIT Q” b STATUS: FES. 
Re ae ee i ei eee 

FKOLVL: 3z2e : ADD 32 OF UNIT 0° ENT TEPRUPT SE he 


:"FK' UNIT 1°S REGISTER ADDRESSES. 


FKILDB: 170340 psi OF UNIT 1°S "LIGHT DATA 8° 
FKILDA: 170342 sADORESS OF UNIT 1°S “LIGHT DATA A’ 
FKICSR: 170344 ;ADORESS OF UNIT 2°S “CONTROL & STATUS’ SEG 
FKIDAT: 170346 ADDRESS OF UNIT 1°S “KEYBORRD DATA’ REG 
FKLINT: 324 ;ADDRESS OF UNIT 1°S "INTESRUPT VECTOR” 
FKILVL: 326 sAODRESS OF UNIT 1°S “INTERRUPT LEVEL” 
;"FK* UNIT 2°S REGISTER ADDRESSES 
FKELDB: 17936 
FKSt A: 1703 3 
FKecSR: 1 
FKEDAT: ieee 
FK2INT: 350 
FKeLVL: 352 

3°FK’ UNIT 3°S REGISTER ADDRESSES 
FK3LD8: 170370 
FKSLDA: 170372 
FK3CSR: 170374 

K3DAT: 170376 
FKSINT: 3S4 
FKALVL: 356 

;’VT’ UNIT O°S REGISTER ADDRESSES. 
VTOCAR: 170300 sADDRESS OF UNIT O°S CURSOR ADDRESS RES 
YTOSAR: 176302 *ADDRESS OF UNIT O°S STATING ADORE G 
VTOCSR: 170304 ADDRESS OF UNIT a2 COMMAND & STATUS RES 
VTOMAR: 170306 sADDRESS OF UNIT O°S MAINTENANCE Fi 
VTOINT: 330 sADDRESS OF UNIT O°S INTERRUPT VECTOR 
VTOLVL: 332 sADDRESS CF UNIT 90°S INTERRUPT LEVEL 
;’VT’ UNIT 1°S REGISTER ADDRESSES. 

VTICAR: 170310 sADDRESS OF UNIT 1°S CURSOR ADDRESS REG. 
YTISAR: 170312 ADDRESS OF UNIT 1°S STATING ADDRESS REG. 
YTICSR: 170314 ADDRESS OF UNIT 1°S COMM STATUS RES. 
YTIMAR: 170316 sADDRESS OF UNIT 1°S MAINTENANCE REG. 
VTLINT: 340 sADDRESS OF UNIT 1°S INTERRUPT VECTOR 
VTILVL: 342 ADDRESS OF UNIT 1°S INTERRUPT LEVEL 


;"VT’ UNIT 2°S REGISTER ADDRESSES 
VTeCAR: 170320 
2s 


VTOMAR: 170326 
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1 1450 000380. VIZINT: 360 

Hs SEED SERS EN: 2 

1338 Scent ;’WT’ UNIT 3°S REGISTER ADDRESSES 
1397 901454 17935¢ VT3CAR: 170350 

1398 501456 170352 VT3SAR: 170352 


1399 001460 170354 VT3CSR: 170354 
7 VTSMAR: 170356 


i402 001466 00372 VTBLYL: 372 
ie ga? irae re: ie 
tape Batasd ip Ekeee: | t5033q TEMPORARY STORAGE OF FK ADDRESSES 


0015 VTSAR: pa ee 
1413 901516 VTCSR: 170304 s TEMPORARY STORAGE OF VT ADDRESSES 
i$ 901514 : 
aig 001516 090332 . VILVL: 332 


1418 ;DL1i REGISTER ADDRESSES 


1420 001520 175610 RCSRO: 175610 sADDRESS OF UNIT O°S DLJ REC. CSR 
dei Qhisee 175620 RCSRI: 175620 SROORESS OF UNIT 17S OL11 REC. CSR 
1432 001524 175630 RCSRe: 175630 SADDRESS OF UNIT 2°5 OLII REC: CSR 
i423 001506 175640 RCSR3: 175640 ZADDRESS OF UNIT 3°5 DLII REC. CSR 
1424 001530 175612 UFO: 175612 SADORESS OF UNIT O°§ DLII REC. SUFFER 
1425 001532 175622 RBUFI: 175822 SADORESS OF UNIT 1°5 DLII REC. BUFFER 
1426 001534 175632 175632 

1427 001536 17564 REUFS: 17564 ae . 

i428 901540 RINTO: 300 SADDRESS OF UNIT 0’S REC. VECTOR 

1429 001542 900302 RLVLO: 302 Pigtail 

1430 O01544 000310 RINT: 310 sADORESS OF UNIT 1°S REC. VECTOR 

1431 01546 00312 RLVLI: 312 

1432 901550 900400 _ RINTe: 400 

1433 001552 ooo4D2 RLVLe: 402 

1434 O01554 900410 RINTS: 410 

1435 OO1SS6 l2 RLVL3: 412 . 

1437 OO1560 175614 XCSRO: 175614 sADDRESS OF UNIT O’S TRANS. CSR | 

1438 001562 175604 XCSR1: 175624 SRODRESS OF UNIT 1° DL11 TRANS. CSR 
1439 OO1SE4 175634 xCoRe: 175634 

1440 O01566 175644 XCSR3: 175644 : 
i441 001570 175616 XBUFO: 175616 _ ADDRESS OF UNIT O°S DLIL TRANS. ‘BUFFER 
1442 001572 175626 XBUFI: 175626 ) SADORESS OF UNIT 1°S OL11 TRANS. BUFFER 
1443 001574 175636 XBUF2: 175636 

1444 001576 175646 XBUF3: 175646 : 
i445 001605 000304 XINTO: 304 ;ADDRESS OF UNIT O°S OL11 TRANS. VECTOR 
i446 061602 00306 XLVLO: 306 : 
1447 01604 00314 XINTI: VECTOR 





SADORESS OF UNIT 1°S DLL TRANS. 












at rah co as 
002 
14 





le 
i 001614 boosts 
14 091€16 000416 
1453 
1454 
1455 
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;DEFINITIONS OF *VT FIELD CONTROL’ FUNCTIONS 
UNL INE=370 


SUMO ERGAVe PRESET 












po0212 
1466 000814 
1467 000232 
1468 
1468 001626 900000 
1470 OOiee 900000 
1472 
































1490 001624 9012737 
a ine Boe 
1493 Boi ead Ole 

| 1494 001646 013706 
1495 001652 000240 
1496 pp lpEe 000240 
1497 1656 000240 
ie Gis pee 
ae Bie Ree 
1501 001672 012701 
1502 001676 72} 
1503 001700 000776 

| 

De hecdiecaiots 


001702 
Oe0000 


VISECS=231 


FCSET: 


090000 
FCSET1: Q00000 


E END OF LINE 
LE END OF PARAGRAPH 
LE END OF SCREEN 


;DEFINITIONS OF *MAINTENANCE’ FUNCTIONS ( SELECTED VIA THE °CSR’) 


CSR=000 


;COMMAND & STATUS REG. 

DATA ADDRESS REG. 

;SHIFT REG. INPUT DATA (EVEN) 
SHIFT REG. OUTPUT DATA (EVEN) 
CURSOR ADDRESS REG. 


: START BO RRE SS REG. 
SHIFT REG. INPUT DATA (ODD) 
; SHIFT REG. OUTPUT DATA (ODD) 


; HERUULEEEAERAESSEESEESEYEEEENEELSESSESSENELVELSEEEEASEABEDSEES ESE 


: TEST ate age! ROU Tie. 


3 £00" 


AM IS 
:T0 COLLECT 


STARTED AT LOCATION 


AM I 
10. RUN yi0 A TELETYPE MONITOR. IF THE PRO- 
ARTED AT LBcATION. 204’ ES PROGRAM *HALTS’ 
TREEDED INFORMATION AND 10 REPORT 


Meet i titi tiieitiriireiiererrertirerirtrrertcc cr rercrccreicors 
C2e4160 INITTY: MOV 


NOTTY: 


‘177444 


oo0co4 1S: 






#1, TTYSWH 
ite 


iG Mo ocy 
TACK , SP 


CORSIZ, 284 
#20000, R1 
2 


;TTY AVAILABLE, SET SOFTWARE SW. 
;CLR TTY AVAILABLE SOFTWARE SWITCH. 
; INIT STACK POINTER=1000 


; INITIALIZATION SWITCH TEST REMOVED TO ALLOW RE-SELECT 


;RESET TIMEOUT 
sTEST CORE SIZE 









i peice 
an 
1$07 Bie 
1$08 1726 
1509 1732 
my Be 
as 

iets Bote 38 
1513 OO174 
1514 001750 
1515 001752 
eB 
1518 Botes8 
1519 001774 
1520 

1Se1 002000 
1See 002004 
1S23 002010 
15e4 O02e9ie 
1525 002026 
1526 002022 
1Se7 002024 
1528 002030 
1$2e9 002034 
1530 002036 
1531 

1S32 o0e040 
1533 002044 
1534 002050 
1535 O0020S2 
1536 002060 
1537 O02062 
1538 002064 
1533 002070 
1540 002074 
1541 002076 





Siiaiaisatatatciistaicsisieiis 
CREE SREB PRS S28 
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TEST PROGRAM 


024142 
901330 


177306 


177274 
002709 


001410 
024142 


177246 


177234 
002700 


024142 
001540 
001600 


177202 


177160 
024172 





000004 
oco00s 


; 901620 


024142 
024142 


001500 


001500 


024140 


CORSIZ: SUB 


INITB: TST 


4§: MOV 
18: HALT 


2s: 


3$: HALT 


INITBA: HALT 


INITC: TST 
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#2000,R1 ;SAVE LAST 1K FOR ’VT’ TEST 
R} ,MEHS1Z 

#6) 084 sRESET TIMEOUT TO "ERTRAP’ 
#4, 86 

TTYSWH TTY AVAILABLE? 


INITC YES, 
GN CHAR SET 


1F FORYE 
OSWR,FCSET 9 ExaTININS THE SUITCH R REGISTER 


T # OF TUBES FROM SWITCHES 


aSWR,  UNITNO 
#177770, UNI TNO 
aSWR s1F BIT 15 IN SUR IS SET THEN 

ag ‘LET USER INPUT DEVICE ADDRESSES 
INITCB : DEFAULT DEVICES 8 VECTORS REGUESTED 


UNI TNO, RO 
#FKOLDB, RS 


sHALT FOR FK VECTOR 
JSWR, FKINT 

sHALT FOR FK ADDR. 
aSWR, RY 
PC, SETED 
RO 
1$ 


8VTOCAR, RS 
UNI TNO, RO 


;HALT FOR VT VECTOR 
aSWR, FKINT 


sHALT FOR VT ADDR. 
JSWR, RY 
pC, SETED 


a 
UNITNO, RO 
SRINTO, R2 
#XINTO, BS 
HALT FOR DL11 VECTOR 


:GET TUBE NO. FROM SWITCHES 
JSWR, UNITFG :SAVE TUBE NO. 
INIT 
MTRSWH ; TYPE HEADER 
+6 :NO, ITS BEEN TYPED 


;PRINT PROGRAM HEADER 










VT MS gdbicimmaeectlaes TEST PROGRAM 
DBVTAC.P1l 
2 104012 
021 
Ges 
1 
104012 


# 


ICEL B 
38 


0 0 b= b= 0 b-- 0» b— 9 = b-- < 
~~ Ce 
ba 
BS 


re 
Sse 


aaa 
ae 


to 

~ 
—-O 

~ 
z= 
nel 
uw 


ge 
x 


1 
1 
bf 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


2 


atk areata ne ate 
Seas 2 
seeneecee J3 


a 


ee 
Vee me 
ages & 


001600 
000260 014750 


Sew 


MACY11 27(732) 


4§; 


14-SEP-76 10:32 PAGE 29 


sSEE IF FORIEGN CHARACTER SET EXISTS 
#177776, R3 
ay reset 


R3, UNI TNO 
MESIA 


;REQUEST NO. OF TUBES 

;GET INPUT 

sTEXT "ARE eM ADDR. & VECT. OK?’ 
;WAIT FOR HIS ANSWER 

;sWAS ’CR’ TYPED? 

sYES, USE DEFAULT ADDRESSES 

sWAS ’Y’ TYPED? 


Set es iP 
;NO, LET R DEFINE HIS OWN ADDRESSES © 
;WE HAVE ASK HIM FOR ADDRESSES 


;FIRST GET FK ADDRESS 
;PRINT UNIT NO 


R3, FKINT 


PC, SETED 
HRUNNL 


2 
SVTOCAR, RS :GET VT VECTORS AND ADDRESS 
UNITNO, RO ‘NUMBER OF TUBES 

#260, MRUNN1 


R3,FKINT 
PC, SETED 
MRUNNI 

RO 
3$ 
UNITNO, RO 
#RINTO, Re 


#XINTO.RS 
#260, MRUNNI 


;ASK FOR DL11 VECTORS 


;PRINT MESSAGE 





VT20_SYSTEN DIAGNOSTIC TEST PROGRAM 
OBVTAC. PLL 


1616 
1617 
161 


621 


ier ivi oie 


; 


ephnhebaee 
8 


0 > b~ 6 ~ &— 0 -- 8-2 b+ 9-2 OH 9- 


é 
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INITCB: 
INITBA 


sREQUEST UNIT NO. 
:DECODE IT. 

M BT Th : SAV, 
INITO: MOV uN FG PIMP 

C CLR SWAP SW. 


CEP SET UP UNIT ‘0° 
4 SWAP SW. 


T UP SELECTED UNIT RODRESSES 
iid AVAILABLE? 


sYES 
xT ‘TYPE IN TST NO. TO BE EXECUTED’. 

sepreeestadteeeeneesssasnepenneedesapatioeetievtia tia lieereneast a 

:TEST SELECTION NO TTY IS AVAILABLE WILL HALT 


WAIT FOR A ; TNO LOADED VIA ark TTY 1 
ARI, - ae ee ov me ef, THE PRINTER FOR nest SELECTED TEST 
[erarassastenasted clonseseubdseemnntnscenesansnsensasenensontensel 

MONITR: —e ; INITIALIZE ON ENTRY 


nove TACK, SP MLL F oF ack POINTER 
LR SuAPER 


;DOES HE WANT TO SWAP? 


;SET -. th’ RESTART ADDR. 
:CLR NTR ADDR TO HALT 
;CLR tis NTR ADOR: TO HALT 


MONITOR SW. 
SCLR "RUN ALL? SOFTWARE SU. 


sTTY AVAILABLE? 

YES, REQUEST TEST 

°GET. TEST NO. FROM bate SW’s 

: SAVE EST NO. 

EXECUTE SELECTED TEST 
TTYMTR: PRI 
CNTRLC 









VT20 $ MACY11 27(732) 14-SEP-76 10:32 PAGE 31 


TEM DIAGNOSTIC TEST PROGRAM 
DBVTAC.P1l 













1672 002650 104015 ASEMBL sDECODE IT 
ie 177740 TTYMT1: BIC “fe CLR UN-WANTED BITS 

PoP 6 ” BGT “a “ sTYPE °?’ IF NUMBER TO BIG 

16 peer Bears 002750 IMP JTESTOO(R3) ‘EXECUTE SELECTED TEST 

1878 002672 104012 PRINT ; ' 

16 74 13 QMARK ;TYPE_’?’ ON ILLEGAL NO.°S 

1 14 BR MONITR+2 RE-START 

1681 101% SETED: MOV RL, (6) SAVE RI 

1682 . 002702. pie7O ooo004 MOV 4'R1 

1683 002706 910425 18: MOV RY’ (5)+ sMOV ADDR TO ADDR. POINTER 

1ES4 b02710 062704 oo00c2 ADD #2; R4 

1685 14 005301 DEC R1 

tess Bosss8 passe 001500 MOV Be nt (S)+ ;MOV VECTOR ADDR TO ADDR POINTER 

1888 002724 bbe? 37 o90002 001500 ADD #2, FKINT 

1689 002732 013725 001500 MOV FKINT, (5)+ 

1690 002736 012601 MOV (6)+. RI 

1691 002740 062737 o00002 001590 ,PFK 

1692 002746 000207 RTS 

pas 5 PEE Ge 
ice : BEELER LRELER LE SELES EE RER VPLS FLEE ERLSELEYSEEEERLEEEFSARER LEER ZL ESSE 









1697 002750 003122 TESTOO: VTLOGIC ;¥T *LOGIC’ TEST 
1633 O02e7S2 OOS16E TESTO1: VTCHAR ;VT "CHARACTER DISPLAY’ TEST 
1701 002754 O0S226 TESTOe: VTMOD1 VT 'FIELD MODE’ TEST ’1° 



















1703 902756 005322 TESTO3: VTMOD2 :VT °CSR PRESET’ TEST 
1705 002760 OOSHSY TESTOY: VTEOL | ;VT "END OF LINE’ TEST 
1707 02762 O05574 TESTOS: VTEOS ;VT ‘END OF SCREEN’ TEST 
1703 002764 O0Sé60 TESTO&: VTBLANK ;VT "BLANK CONTROL’ TEST 







1711 002766 905740 TESTO7: VTALINE ;VT ALIGNMENT’ TEST 
1713 002770 005766 TEST1O: VTFOCUS ;¥T *FOCUS’ TEST 

1715 002772 006014 TEST11: VTWORST ;¥T "WORST CASE’ TEST 

1717 002774 O0604e TEST12: VTCURSR ;¥T "CURSOR CONTROL’ TEST 














1743 002776 006136 TEST13: VTOOD. ;¥T ’ODD ADDRESS’ TEST. 
1764 003000 003016 TEST14: VTRUN ;V¥T *RUN ALL’ TEST 










7 
1355 0032002 006236 TESTIS: FKLOGIC sFK ’LOGIC’ TEST 
i725 003004 o07416 ' TEST16: FKFUN sFK ’FUNCTION’ TEST - 
1727 003008 007576 | TEST17: FKCHAR ‘CHARACTER’ TEST 
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003010 010126 TEST20: FKREPT ;FK ’REPEATIBILITY’ TEST 
903012 TEST21: SYSTST ;VT *SYSTEM EXERCISER’ TEST 
003014 TEST22: TESTX ;FK/VT "LOGIC SUBTEST’ SELECTION 
| s SRERSOEEESUMSRSE SSO RERUEES SAEEROOpUrauayeneasaseecueteatasseneeneese 
BROUTINE ENTERED V ee 


bake HU HOSES Felt DO tdR ne HERO LE SP 


ON BOTH UNITS IF UNIT '2” WA 
 SeESEGUSSESEEAEESEEEAAGESSESODSSOSEOSSSEREEREREEASEOUEESAEEHHHEEEEEE 


VTRUN: INC 


VTLOGIC S 
eeeeeeskttpreeteaatieceeeesssbitneeessuasiibeeeesssaneoneeeessaaanannes 


:VT20 LOGIC T 
erttitititittiiiititiiititititittititititiiittttiittttttirttitttttittteite 


SETUFV: MOV VTCSR, VTCSRY ;LOAD RY’ WITH THE ’CSR’ ADDRESS 
MOV VTMAR, VTMARS § ;LOAD °RS’ WITH ie *MAINT’ ADOR. REG. 
OUR PRINT INHIBIT SW. 
CLR PRINT INHIBIT SW. 


;LOAD THE TRAP ’TRAP’ WITH LOGIC ERROR TRAP 
;SET UP *SCOPE’ RETURN 

;SET PROCESSOR PRIORITY TO °7° 

SET UP TEST NO. 


Bess SaaS 
os 


3 
soe Breese 


1 
i 
i 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


stator! 


VTLOGIC: TST ;TTY AVAILABLE? 
BE +1 sNO ; 
; TEXT *VT20 LOGIC TEST’ 
VTREST: TSR PC, SETUPV ; INITIALIZE THE LOGIC TEST 
Art ar ar gee ges crap ert 7 ee mene 


;TEST THAT THE °CSR’ WAS INITIALIZED CORRECTL 
SSP AALaS EET EAAEREAESSE EE SEEE REET ESSE TES EERE EEEAEEEE AEE 


VTl: ~ ;’VT’ TEST 1 
ey #125212, aVTCSRY 
MOV aVTCSRY,R1 ;READ CONTENTS OF THE *CSR’ 
SIGNORE "BIT 12° 


BIC #59000, R1 "BIT 14° 
BEQ +4 ;RESET SHOULD HAVE CLEARED ‘CSR’ 
ERROR CSR’ SHOULD-= °O OR SOOOO’ 


5 REAR REEL EERE ERE ERE EEE EEE ERE R REE ER EER ERE ERR EE EE ERERRER ERE 
;TEST THAT THE MAINTENANCE’ REGISTER WAS INITIALIZED TO °0° 
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3 EE EEE HEHE TEE HEE E et 
VT: peoree 3°vT’ TEST 2 


MOV JVTMARS, Ri sREAD CONTENTS OF THE *MAR 
BIC #59000, R1 :IGNORE ’BIT 12’ AND ‘BIT iW 


;RESET DIDN’T CLR THE *MAINT’ REG. (EXCEPT BIT °12’ AND 
LUI BY Ga" eee 
itttiitiitititititiitititititittitttitiiiiitttittititiitititi titi tity 


VT3:  SCOPE,3 °VT’ TEST 3 
MOV #125212, 0VTCSR4Y :WRITE CSR’ TO 1125212" 
MOV aVTCSRY ,Rl ;READ CONTENTS OF THE *CSR’ 
BIC «aS IGNORE "BIT 12’ AND ’BIT 14’ 
CMP se5212 Ri 
BEQ 44 


E 

CLR aVTCSR4Y 
JEHEHHUHB HBB HEHEHE HEHEHE HEHE HEHE HEHEHE HEHEHE 
TEST FOR WRITING THE ’CSR’ TO ’S2S04’ 


Perret tannariemeeseasitnay ear ceettt Gea 
VT4: . .* ;’VT’ TEST 
MOV avery QVTCSRY ; WRITE rear? TO "S2504" 


#52504, JVTCSRY 

+4 ; #*¥BEWAREX*® BIT 6 IS CLEARED ON TYPEOUT 
:’CSR’ SHOULD = *5e504" 

aVTCSRY WRITE *CSR’ TO *0° 


bb ttt bth dtd thet telah ttt dated tab-bpltal-tebtatelt halt} talealaalabalahalahalahatabalabalaiatalataiadel 


: TEST FOR READING THE *CSR’ VIA THE ’ 
PreerUTeerrerserererertr tert rier treeteTerertettrrtre etter rete TTT eT Tt tT 


VTS: SCOPE,S 
MOV 


z 
S 


S eceos 
sae 


z 


;’°CSR’ SHOULD = ’125212’ 


Seapiennee 
i 


MoOmMmmmommm«cm 
a ae 
WOO NOUlL£CWTH- 


#157760, VTCSRY ISELECT MAINT CSR’ VIA THE *CSR’ 


a1a7 760, OVTMARS Se SHOULD=*CSR’ 
#*#BEWARE®# BIT 6 IS CLEARED ON TYPEOUT 
;HAINT REG. NOT =’CSR’ (157760) 


—Ule— C— 


Ben 


QVTCSRY 
JVTMARS, RI 
#50000, Ri 


SSSR Shes 


;*MAR’ SHOULD = ’CSR’ (0) 
;MAINT REG. NOT=’CSR’ (0) 
j RRR ER AAA KARE EEE REE REE K EERE EERE EE EERE REE EAA E REAR ERR ERERER 


WRITE THE ’CURSOR’ ADDRESS REGISTER TO ' 125252" 
SP ertrtiiitiittit titi ttiii titi i ttt tt ttt tit ti ttt it tere 


= ba bee 


8 


uz 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
bf 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


(pup co cocoED OD OO 
Tae tare eo 


~ 
int 
Se 


000906 VT6: SCOPE ,6 3° TEST 6 
leSeSe 176150 MOV #125252, JVTCAR ‘RITE REG. TO ALTERNATE 1°S 
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003334 176146 


ae 
Ee 


009010 
125252 


ES B 


Re ETE $F. 


OSeSeS 
000010 
OS2Se5 


176072 
176062 


b= b— b= b= b+ b— § — b+ b  & = 9 0 — 9-2 p> pps pp - 


176050 


000011 
177777 176020 
000010: 


000012 
0001 


8S0 
ee 
83 
854 
855 
8S6 
857 
8S8 
859 
860 
851 
862 
863 
864 
865 
1866 
1867 
1868 
1869 
1870 
187 
18 
1873 
1874 
1875 
1876 
1877 
1878 
1879 
1880 
1881 
1882 
1883 
1884 
1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 


175750 
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#CAR, IVTCSR sSELECT *CURSOR’ ADDRESS VIA ’CSR’ 
iesese, SVTMARS :READ CURSOR ADDRESS VIA ’MAINT’ 


;CURSOR ADDRESS SHOULD=12SeSe 
avicee 


s RERKAERERAREAE ER ERRREL ERE RE LEER RARER ARAL ELEAERARERER EARL ARERR ERLE EE 


;WRITE THE ’CURSOR’ ADDRESS REGISTER TO ’ 
Pertretittiitittticiitettttitttttitiettirttttitiiiiriretiiiitereet eet 


VT?7: s)VT? TEST 7 

{WRITE COMPLIMENT OF PART I 
SSELECT CURSOR’ ADDRESS VIA ’CSR’ 
:READ CAR’ VIA MAR’ 


;’CAR’ SHOULD=S2eS25 


? 
#52525 
#CAR ies 
_#e5e8, JVTMARS 


ERROR 
CLR 
CLR 


; RERRRRERLRRLE ELAR LEER RELA E LE RAE LAER ELLA ARERR EAL ER EE REA EEE EE EERE 


WRITE THE ’CURSOR’ ADDRESS REGISTER TO ’ 
} SH HEHEHE 


VT10:  SCOPE,10 -’VT? TEST 10 
MOV #-1, IVTCAR sWRITE REG. TO - 
MOV #CAR.AVTCSRY § :SELECT CURSOR ADDRESS 
CLR aVTCAR ‘WRITE REG. TO ’0’ 
ist OVTHARS 


aVTCSR 
dVTCAR 


;CURSOR ADDRESS SHOULD="0’ 


Ee are etter eet arin teat eet ii 


;TEST THAT THE "CURSOR ADDRESS’ REG. IS CLEARED VIA ‘RESET’ 
SSS AALDEEAESEAASSSE SSE OSERERAGSSEAATASEEEEESALEDEOES SEAEEEEEEREEOER 


VTll: SCOPE,11 "VT? TEST 11 
MOV WRITE ric. =-1 
RESE : ISSUE "RESET’ TO CLR REG. 
‘SELECT CAR’ VIA 'CSR’ 
TEST IF CAR’ WAS CLEARED 


ERROR ;RESET DIDN’T CLR °CAR’ REG. 
eC 
TEST FOR ROTATING A '1’ THRU THE ’ 

Pittrrtiit tit tttitiii iit ritiiitttiitititttttitt i ttttit ttt ttti ttt 


VTl2: SCOPE, ‘VT’ TEST 12 
MOV ; LOAD THE TEST REG. ry? 
LOOP12: HOV 


#-1, dVTCAR 


8CAR, AVTCSRY 
OVTMARS 


WITH 
;LOAD ne "CAR’ .WITH THE bral REG. 


CAR’ SHOULD = CONTAINS OF R3 
avTCSRY . 












> = 6 b— 6-= » ~~ b~ 0 6 9-- b= 9 pb — pb 9p 2 - 
Ow 
o— b+ bs 


~ 
eo 


oo 
OWoOoOWoOWW 
= bps pe 
WONMOU CWO 


SSSA ReS 


v0 cid EE) AD ED ED LD cL) ch ED LDL) ch ek) AD EDAD oD oD ED oD KD ED oD EDLY OD ED LD 


UR SEP SEP LE n 


GEURREGNEESESR B 


vr20 SysTEn DIAGNOSTIC TEST PROGRAM 


a 


oo0or~ 


— 
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RU R3 2 ;ROTATE BIT 


STEGT FOR WRITING THE “STARTING ADDRESS’ Rec TO ‘ieee 


;TEST FOR WRITING THE *STARTING ADDRESS’ REG. TO ' 125252” 
7 HGH HHH HHH 


VT13: PE,1 VT’ TEST 13 
“wl UFF , VTSAR sLOAD Leta AD 1) PREVENT TIMEOUT 
avVtCSR4 s SELEC *SAR’ TO MAINT VIA *CSR’ 
NOV fie 125252, aVTSAR .;WRITE REG. TO ALTERNATE 1’°S 


WAI TSYNC ;WAIT FOR VERTICAL S YNC. 
8 bLESeSe, SVTHARS 


ERROR ;STARTING ADDR. REG. SHOULD=12S252 


sTECT FOR WRITING THE STARTING ADDRESS’ Rec TO Gscse’ ee 


;TEST FOR WRITING THE ’STARTING ADDRESS’ REG. 
SEE EAEALANEEMESEALSEAEEEDEEASSASSOOEREANSSSAAESENEETEEEEEAEEAEAEEEESES 


VT14: SCOPE,14 s*VT* TES! 


MOV #VTBUFF , IVTSAR 1 PREVENT TIMEOUT 
MOV #SAR, AVTCSRY 


LOAD 
:SELECT ’SAR’ TO MAINT VIA ’CSR’ 
MOV #52525, 3VTSAR WRITE COMPLIMENT OF PART I 
WAITSYNC WAIT FOR VERTICAL SYNC. 
CMP #52525, JVTMARS 
BEQ +4 

ERR - SAR’ =52525 
TTT TTTTETTTT TET TTT TTT TTT TTT TTT ETT TTT TTTTT STE TTSTSTTTTTT TESTE ESTEE TT 

WRITING THE ’STARTIN ’ TO *0” 


’ 
; TEST FOR ; 
rit tit iitititiitittittttitiiiitttitttiititiittittiiitttttttttttttice 


VT1S:  SCOPE,15 -°VT? 
Aoy LEGAL 





#VTBUFF,JVTSAR ;LOAD apbee TH PREVENT TIMEOUT 
MOV #SAR. aVTCSRY ; SELECT ’STARTING ADDR.’ REG. 
CLR aVTSAR I G. T 
WAITSYNC WAIT FOR VERTICAL SYNC. 
TST ay THARS CHECK FOR '0? 


OR STARTING ADDRESS REG. SHOULD="0" 
tft i ont ner thon ti 
: TEST FOR ROTATING A 71’ THUR THE STARTING ADDRESS REG. 

NOTE: *R3’ IS ED AS A CHECKING ADDRESS AND WILL CONTAIN THE 
EXPECTED DATA ON A FAILURE. 
Feerttitittititiiiiittt titi tit iittiiiiitiitiititittititiititiitittety 


VT16: SCOPE,16 ;°VT’ TEST 16 
MOV ors aVTSAR ;LOAD LEGAL ADDR. TO PREVENT TIMEOUT 
V TEST REG. WITH °1° 


MO OAD THE 
LOOP16: MOV SAR aVTCSRY ; SELECT “STARTING ADOR. REG. 
;LOAD *SAR’ FROM ’R3’ 


MOV R3,aVTSAR - 
WAIT *WAIT FOR VERTICAL SYNC 
CHP _ R3, AVTMARS "CHECK IF REG. LOADED CORRECTLY. 


+4 

:*SAR SHOULD = CONTAINS OF 'R3’ 
:ROTAT EB 
: LOOP UNTIL CARRY IS SET 













ROL R3 
BNE LOOP 16 
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STEST THAT RESET’ WILL CLR THE STARTING ADDRESS’ Rec 


;TEST THAT ‘RESET’ WILL CLR THE STARTING ADDRESS’ REG. 
Mitietiitieritttiictttttrtrititiititititettttttttitttti rise rier ie res f, 


VT17: SCOPE, 17 . -*VT’ TEST 17 

175544 MOV #VTBUFF,JVTSAR ;LOAD LEGAL ADDR. TO PREVENT TIMEOUT 
MOV #SAR, aVTCSRY =: SELECT "STARTING ADDRESS’ REG. 
175532 HOV #-1,QVTSAR ~° :WRITE REG. TO’ re 
SET “RESET SHOULD CLR REG. 

WAI TSYNC -  $WAIT FOR VERTICAL SYNC. 
MOV #SAR,AVTCSRY § ;RE-SELECT THE *SAR’ 
Ist OVTMARS 


3 


;RESET DIDN’T CLR ’SAR’ 


 RERAARAAALARKELSLALALALLLAE RARE LE LE LE LLLLELE LE LER ER ALLELE LER EELELREEER 


: TEST THAT THE DAR’ (DATA ADDRESS REG.) IS LOADED FROM ’SAR’ (START ADDR. REG.) 
Betitiritritittiriitiirtictitterttetittitittitttttititetirtttirititi tis. 


oo00e0 VT20:  SCOPE,20 "VT? TEST 20 
’ 1eSeSe 175502 MOV #1252S2,aVTSAR ;LOAD THE * SAR’ 
: WAITSYNC ;WAIT FOR VERTICAL SYNC. 
000902 MOV #DAR SE ne ;SELECT MAINT. 'DAR’ VIA ’CSR’ 
1eSeSe m4 #lesese, aV 


A A Ha a ab nS at 


b+ bb = 0 b— 6 b— bb 9 9 9 0 p= pe 


wo 
3 


ERROR ;’DAR’ WASN’T LOADED FROM ’SAR’ 
CLR aVTCSRY 
1 CTC a ao eee 


ISSUE RESET TO CLR TIME-OUT FROM PREVIOUS TEST 
5 RARER REE EERE REE EEE EEE EER EERE E ERE ER REEL EERE EEE E EERE EE RERES 


000021 VTél: SCOPE,21 '  g*V¥T* TEST 21 
RESET 


197 
19 
1973 
1974 
1975 
1976 
1977 
1978 
1979 
1980 
1981 
1982 


Lee etter a eater rte itera 
TEST THAT THE "DAR’ (DATA ADDRESS REG.) IS LOADED FROM ’SAR’ (START ADDR. REG.) 
5 RR RR RRR ELLE EKER AEE REE EE EERE EER REESE EEL ERE E REE E EEE EL ER EEL ERE SE 


VT22:  SCOPE,22 ;°VT’ TEST 22 
175442 MOV #OS2525,3VTSAR ;LOAD THE ’SAR’ 
WAI TSYNC {WAIT FOR VERTICAL SYNC. 
MOV #DAR,JYTCSRY — ;SELECT MAINT. "DAR? 
CHP wOsese4, aVTMARS 


;’DAR’ WASN’T LOADED FROM *SAR’ 
A ipl ig tit lille 


;ISSUE RESET TO CLR TIME-OUT FROM PREVIOUS TEST 
FT tttttt ttt itittiii titi titiiti iii ttt ttitttititi titi tt tii itt i tiie 


104001 -  -¥T23: acre 23 ;’VT’ TEST 23 
oocods RE 


ERR HEEE BE EEE EE 


;TEST FOR ROTATING A '1' THUR THE 'DAR’ (DAR IS LOADED FROM THE SAR). 
HEE HHHHEH HEHEHE HEE HHEH HHH HE EHH HEHE HEC HGGEER RAE 


NNN 
SSSR R POR See RES 
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VT20_ SYSTEM DIAGNOSTIC TEST PROGRAM MACY11 27(732) 
DBVTAC.P11 







soe 004072 104001 goodes VT24:  SCOPE,24 Whey "EEG 24 ot oa 

Si? BRS BIRCH PRONG Looren: HRY” 48: Shrsen EBB THE Teg we 
1g 004106 104021 WAI TSYNC WAIT FOR VERT ICAL SYNC. aon 

201 110 bieria poso02 MOV #DAR, JVTCSRY FERC I phe MAINT. 'DAR® VIA ’CSR 
14 604114 15 CMP R3, JVTMARS 

2015 OO4116 001401 . BEQ +4 

sts Biss MG = SINT. pricuey Stas fr Se 7 sone eae pat 

2018 O04124 006103 ROL R32 sROTATE BIT 

2019 004126 901365 BNE LOoPe4 ;ROTATE THRU REG. ., 









2021 ae fe at ten pane eee 
2022 T TO CLR TIME-OUT FROM P 

2023 Peer ee ere cores 
2025 004130 104001 000025 VTeS:  SCOPE,25 ;’VT’ TEST 25 

2026 004134 000005 RESET’ 





JHBEHH BEEBE HEBB HHH HEHEHE HEHEHE EEE E EEE RETR EE 
2023 TEST THAT THE ’CURSOR ADDR.’ BIT IS SET IN THE 'CSR’ IF THE ’CAR’ 

2030 7 SAND THE ’SAR’ ARE SET EQUAL. ALSO B =SA 

2031 5 RRR EAE RARER AER E ER REE E EEE EK LEER EERE EER EERE EEE AREER EERE EERE EEE 











2033 004136 104001 oD0026 VT26: -SCOPE,26 ;'VT? TEST 26 
2 oui 012777 020723 175336 MOV #SHF TBF +1, 2VTSAR "LOAD *SAR’ 
20 150 104021 WAITSYNC : WAIT FOR VERTICAL SYNC. 
2036 004152 012777 020723 175324 MOV #SHFTBF+1, JVTCAR ;LOAD.’ AR’ = ’SAR’ 
e037 o04160 bles oo04 MOV . #SRIDE,aVTCSR4 sFORCE ’NPR* “TRAN NSFER 
164 714 010000 BIT #10000, aVTCSRY ‘TEST IF BIT le (CAR BIT) SET 
2039 004170 001001 BNE 
2040 004178 104400 . ERROR ;’CAR’ BIT IN CSR’ gion’ T SET W/°CAR’ = ‘SAR’ 
2041 904174 032714 o40000 BIT #40000, IVTCSF4 :TEST IF BIT14 CLEAR 
e042 004200 001401 BEO +4 ‘SHOULD BE WHEN SAR=CAR 
2043 O04202 104400 ERROR *BIT 14 NOT CLEAR 
2044 O04204 O0S014 CLR 
. 2045 j RERRERAAA RELA RRELA RAL RELA LEAK LAKE EL RREL ERE A ELE RELA ELAL ELE E ELLER ELAR ELLE 





A oe Sal Be geen ADDR.’ BIT IS CLEARED IF THE *CAR’ AND *SAR’ 
ait ertittrittiiitittitiitiiititiiitiitiietitetiitiietititttitttttitirtt tities 







Soar Bowes Ofer? Geurss i7saee ‘7*”* Rov.” ASHFTF#13,avTSAR [LOR TSAR 
2e0Se O04ee0 104021 WAIT thee VERTICAL SYNC. 
Sos) Doves 18714 Boos es wR uteSha | FORCE a st NSFER 





2055 004234 th 010000 #10000, a TEST IF BIT le (CAR BIT) SET 








2057 OO4S42 104400 BEROR °CAR’ SET W/ *CAR’ NOT = ’SAR’ 
2058 OO04244 032777 COYO0D 175236 BIT W4O00,QVTCSR —; SEE IF. BIT 14 IN CSR, SET SHOULD BE 
povese 601001 BNE +4 WHEN CAR <> SAR WITH ECO FOR BIT 14 
454 NOP ‘NOP IF NO ECO, PUT IN 104400 IN THIS 
2061 “LOCATION IF ECO IS 
2062 OO4256 OOSO14 






CLR aVTCSRY 
5 RERRRLAARAALAE REALL AR ALEK EAA L ERA LAER RAKE ESLER EERE RARE LER LE RARE RALERE 





- 
‘ 
“tf 
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“where 


pe 


Jt 00t3 
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inert 
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0CS2 


- 
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fururu 
SB 
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a 


; Hg bat ht tt bt bony ted tt ne tent bie int ngbnt het tntnt tng SOL GL Ly ak oh ok oko Gk oh 
SBIR EEREB SE aR 


0+ 0+ B-+ B+ B= b+ 9--« B= & 2 9 = 0+ Oo 9-0 8-0 8 8 CC CCD 


0+ + 0-= 0-2 0-2 be 
WIM NW £aITe- 





MACY 27.732) 14-SEP-76 10:32 PAGE 38 


;TEST THE *EOS* (END OF SCREEN) BIT IS SET IF THE "EOS* CHAR. IS TRANSFERRED 


s SFSHSSSESSSSSSSSSSSSSSHSLESSSSESSSSLESSESSSESFSASELFLAFAASL RAS FLSSESSLSSS 


V730:  SCOPE,30 ;*vT’ T ST 30 
MCV aSHFEND , aVTSAR sL 
WAITSYNC ial FOR OR VERTICAL SYNC. 
MOV aSRIDE. IVTCSRY RCE *NPR’ TRANSFER 
BIT #20000, VTCSRY ite IF ‘et 12 (E05) 


OR 
CLR avTCSR4 


(os gg gy rg goo eee 

; TEST Pe ae win wr per * via * GET TRAST ERAED ro DATA BUFFER 
70 fT ERIES o's HIFTS DONE AND THE ’MAR’ IS COMPARED 
70 THE DATA BUFFER AFTER EACH 


 lenakebeanabingiaaientaaiecusbesesenbentanseusninendasmennebeniadsianhie 


;°E0S’ DION’? SET IN °CSR’ 


VT31: ar ,3l ;*vT’ TEST 31 
#16, ICOUNT RESET ITERATION COUNT TO ’8” 
NOV ate 67, SHFINES :SET UP TO PRIN OR 
MOV aSRIDE’ SELEC :SELECT 'SHIFT INPUT para EVEN’ 
JSR eC. INT = ;INITIALIZE SHIFT TEST 
JSR PC, SHiF :SUSROUTINE TO FORCE '64’ ‘NPR’ XFER 
ERROR seSHIFT IN INPUT DATA EVEN’ SHIFT ERROR 
BR TAGVB RROR 


AG 
PRED TEER... REE 1 EN |. Ta 
:AT THIS POINT "64" SHIFTS MAVE BEEN MADE TO THE “SHIFT REG. INPUT DATA 
SEVEN’. THE NEXT XECUTES °63° MORE SHIFTS VALIDATING THE 

euntet REG. OUTPUT DATA EVEN’ INPUTTED FROM THE PREVIOUS TEST. 
PPOTETTTettTrtrererrerrerererirerrerrrrererrreritererererrrrrrere ttre ttt ee 


MOV 8MES38, SHFMES 
MOV BSRODE SELECT  ;SELECT ‘SHIFT QUTPUT DATA EVEN’ 
JSR INItSF SINITIALIZE SHIFT TEST 
157 Feat * ‘UPDATE BUFFER COMPARE POINTER BY ‘2° 
INC RO :SHIFT ONLY 63 TIMES FOR OUTPUT 
JSR PC, SHIFT :SUBROUTINE TO FORCE THE °63° NPR XFERS 
in ERROR :*SHIFT OUTPUT DATA EVEN’ SHIFT ERROR 


pepeetpentpanespuprsenrenomievencnesminnestpnetesvesssnnreanpuateeutenssent 
; TEST THE * SHIFT Aa? INPUT DATA ODD’ GETS TRANSFERRED FROM THE DATA BUFFER 
70 THE "MAR’. A SERIES OF *64’ SHIFTS ARE DONE AND THE MAR’ IS COMPARED 
70 THE DATA BUFFER AFTER EACH SHIFT 

LE REREREAER EAE R REAR EERE EE ERAER REELED ELEREAERERERRERAAERADEREEREEREREE REDE 


VT32: SCOPE,32 ;’VT° TEST 32 
nov anES 
MOV iti ee ;SELECT *SHIFT iP T T.pATA 000° 
JSR ;INITIALIZE SHIF 
JSR pe’ ; SUBROUTINE TO FORC : 1° *NPR*_XFER 
ERROR ; SHIFT ee DATA ODD" nal ERROR 
BR TAGVC SEXIT ON ERRO 













u 
w& 


furururururururure 
aut ee vy 2 


es 
wo 
FA 


Sebo 


Tururururororuniorurnorororururorororurururoluruorururofrorurorurulfurufururururururururufurofruru 
0 0+ 0-= b= b= b0 #2 = Bn b= 2 0 2 bs Bs 2 2 b= 2 F222 2 B20 = B02 F- 2 0 P= 8 = & 2 F-2 b 2 B20 2 b= bo ha bo Bo fe bo he 


AZIN A GSSVHHLGO So VAL bin we Er oow 


VT720 SYSTEM DIAGNOSTIC 
DEVTAC.P1) . - 


* 
ie a 








TEST PROGRAM 


024136 
016774 


000034 
173000 
016740 


ood2e4C 
170000 


024136 
016774 


o20022 
o244a4 


020376 
174756 


174710 


174500 
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A ITITITTITITTITITITTITITTTIITITIIIITTTIITiItLLiTLLitiLiTLiLiLiLL LL LLLLiel, 


Sol hl Po Next Tesh Cicuies ERY nore sutFTe vACIORTING THe 


| Sasshunasinsanbantassessbenbaskanabenerenssbonnseseckesnsainnnenmeneenel 


_ MOV #MES38, SHFMES 
MOV . #SRODO; SELECT ELECT ’SHIFT OUTPUT DATA ODD’ 
JSR pt 360 SE Hi age 13t6H Fy TEST 
TST = (RR). UPDATE BUF FrER COMPARE POIN TER BY ’2° 
INC RO MET ONLY b3 TIMES FOR FOR OUTPUT 
JS PC, SHIFT : SS ISROUT INE Re eye NPR XFERS 
cone ERROR : SHIFT INE out DATA one SHIFT ERROR 
S FECT NXM’ FOR CAUSING AN INTERRUPT VIA LOADING A ONXN’ ADDRESS IN Te cna 
:TEST "NXM’ FOR CAUSING AN INTERRUPT vIA LORDING @ "NXM’ ADDRESS IN THE ’SAR’ 
"NOTE: THIS IS THE FIRST TIME THAT THE 'INTR. ENABLE BIT IS SET OR USED. 
enkinaehsuldaneisniataunbotecsassnebashnentotenssdabensaneseamaneentianel 
VT33:  SCOPE,33 .*VT? TEST aa? 
MOV #100, ICOUNT taeeer ERATION COUNT TO °100° 
CLR T sCLR SOFTWARE Sid 
MOV #173000, 2VTSAR :LOAD 'SAR’ W/ stm! ADDRESS 
ISR PC ,LDVTYT “LOAD THE ’VT’ VECTOR ADDRESS 
WAI TSYNC ; sWAIT FOR INTERRUPT 
WAITSYNC 
ERROR ;SETTING *SAR’ TO *NXM* ADDR. DIDN’T ERROR 
TAGVA: MOV STACK, SP :RESE! Sack POINTER 
JSR PC CLEVTV RESET IV VECTOR ADDR. TO HALT 
it av vies iTES THe ’NXM’ SET THE ERROR SIT 
ERROR ;’NXM’ FAILED TO SET "ERROR’ BIT 
RESET 
seeT THAT NO INTERRUPT OCCURS UTTH PRs aT PRIORITY ee 
“TEST THAT NO INTERRUPT OCCURS WITH PROC. AT PRIORITY 
; EERE ELE EERERES ERAS EEEEE RE EERE SLSR EAE EL ERER DE SEL DEER ARER ERED EER EEE 
VT34:  SCOPE,34 :*VT’ TEST 34 
MOV #173000, 3VTSAR —ve" 
ISR PC,LOVTVT sLOAD ‘VT’ INTERRUPT VECTOR 
MOV #240, aPSW 
MOV #170000, RO 
INC RO 
BNE -2 
BR ‘+10 :'OK’, NO_INTERRUPT OCCURRED 
TAGVD: ERROR tINTERRUPTED WITH PROC a PRIOR °S’ 
MOV STACK, SP 
CLRYTV 


ssupesuvnatenvesnsieseusesonsneavegnsegctansengensnecsensanenngenscens 
; TEST THAT NO ° ae ons OCCUR IF THE *VT’ IS RUNNING AND THE 
; STARTING ADDRESS "RE HANGED. 


be essbesenceceasenescaseecescersseesnesessnaceseseceecssesesssvaneves 
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b+ ph = BH 


etal 


BESRRLSCLSOSIRREO EOS tat B 


Sanisunes 


Purururorurorururururury 
S.o0 NOU Ew Ow 


ny 


VT35: 


TAGVE: 


TAGE: 


MTs iii i eitttttrtttrrtrtitiiiiiiiiiiiiiiiiieereeee cece oreg 


:’VT’ LOGIC TEST COMPLETE 
erriititiitiittittiitititiiitiiiitiittiitittitttttitttrerttttittt ees 


SCOPE , 36 ;’VT’ TEST 36 
PRINT 


VT36: 


eer rir errr erent. 
;SUBROUTINE TO INITIALIZE THE °SAR’, ’CAR’ AND SHIFT COUNTER FOR THE 


;°VT’ LOGIC SHIFT TEST. 
erririttititiiiitittritiitiiitititiiittttiittiitiitittttetttrtttiorey 


INITSF: MOV 
MOV 


:sveeneenssesenguensesuaneneenseneensessvanteneensennenstareaneyseass 
; SUBROUT *NPR’ XFER 


;DATA EVEN 
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SCOPE, 35 TEST 35 
M #10, 8 SET UP i, Ybor COUNTER 
#SH TRF £+8, 00 
ll YTSAR 
;WAIT FOR VERICAL SYNC 
Moe, LOVTVT :LOAD °VT’ INTERRUPT VECTOR ADDR. 
Re 
Re sEVERYTIME 'R2’ OVERFLOWS THE 
2 :*SAR’ IS RELOADED 
RO, aVTSAR "RELOAD ’SAR’ 
ST (RO)+ 
WAITSYNC | sWAIT FOR VERICAL SYNC 
DEC Rl 
TAGVE 
+10 0K, NO INTERRUPTS OCCURRED 
gi" ERROR OCCURRED WHEN *SAR’ WAS CHANGED 
STACK, SP 
PC, CLAVTV 


YNC 
SSHF TBF RE 


NE TO FORCE THE FOR T SHIFT 
SES eT UNION te 18 THE peeeeerey SHIFT FUNCTION (SHIFT INPUT 
seececescbececsscnssscesseceasseacdecunssuususnsuescuseceueceuseesans 


SHIFT: 


RO NCREMENT Nea” RANGE HIFT COUNTER 
SELECT, aVTCSRY POR fe 3 

(R3)+ SUPORTE TARTING ADDRESS BY *2° 
shes ET UP TO GET NEXT ae WORD. 
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; TEXT * TEST COMPLETE’ 
;END OF TEST 





+4 
VTCHAR ;CONTINUE TO CHARACTER TEST 
VTREST _ gRESTART THE LOGIC. TEST. 






SSHETBE,QVTSAR ;LOAD "STARTING ADDR’ 
a ;WAIT FOR VERTICAL SYNC. 


Rcwersa i607 BEd 





*VT’ LOGIC 










WAIT FOR VERTICAL SYN 
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DBVTAC 
000360 a3E0,AD Heck Se ee ee 


S 
000040 SHFLST: #32. RO ils on F 

BNE Bese His THE reurn ler 
020031 860031 , 2VTNARS yes, END OF SCREEN SHOULD GE SET IN MAR’ 


:NO, 3 
004752 SHF 32: Ye Ret aarti OF POINTERS FOR *32’ MORE SHIFTS 
000040 #32. ,RO RESET SHIFT COUNTER TO COUNT TO °64’ 


SHF64: iS HIS THE LAST SHIFT 
COMPARE DATA TO "MAR’ DIRECTLY 
ives EOS’ SHOULD BE SET 


X 
ie ot en *R1’ TO = EXPECTED WORD 
COMPLIMENT BLANK BIT FOR COMPARE 


3aS" 


cone 
Mo 


SHF SAD: 
TSTSHF : 


mmm 
a ie 


Ses 


Tes. FORE NEXT SHTET 

Be ROR ON THe LAST SHIFT? 

iY ves SW SET TO CONTINUE SHIFTING? 
te UR ey AND REPORT ERROR 


174162 


£6R EGLNR ERG EORNS 


Stonty INTTIACIZE. BUFFER 
EXITSF: ADD wi fs oe ,° 5 aie OVER ERROR 


T 
al Bi Allain, mC A NCE: 
iT "CHARACTER DISPLAY’ TEST (1) 
ae TEST DISPLAYS, ALL ALL 160" VT ¢ HARACTERS ONE AT AINE UNT UNTIL THE ENTI nee 
i nex AoLER es ER RIS TSPLAYED BT EACH PINE THE THE ea TmaTERY 2) EC Is Sts: 


T 
EO AESFIRET SE SHURE ae bSLEoh al TRSh iba” Cae 
 eeeeeseseusessescessesnsussussesceucceseesecessssesssasnssevenrssencs 


005166 020402 VTCHAR: Pett ay SVTCHAR , RETURN 
MES24 ; TEXT "VT CHARACTER hati TEST”. 
EOSGUF ;LOAD ’VT’ ge WITH *EOS*. 
024156 ‘ —— SUBROUTINE SOFT ARE SW 


AY 33 SEC. DELA 
015170 io PC, INTCHR :CREATE 8 BiseLay NEXT CHAR. 


IBRD OF Cine ReToane ene 


END OF SCREEN RETURN HERE 


Bee 
aoe 
e 
00S 
ie 
00S 
e 
OCS 
00S 


b= & <0 -+ § -< b= b= b= & + b= & = b-< b ~ §= 9 0 fh be 2 Bo 


o 
<£ 


— 
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912737 
104000 


012737 
104000 


TEST PROGRAM 


174140 


174122 


174104 


174066 
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aia ao”! 

:THIS TEST DISPLAYS THE 'VT’ CHARACTER SET. USING ALL ’S’ FIELD D CONTROL MODES. 
:(N 1 BLINK BOLD, BLANK AND UNDERLINE). T TES! DISPLAYS CHAR 

240-136 CtRes =5’ USING ALL 'S’ MODES. CHARACTERS REL (WITH THE 
SEXCEPT ON OF CHARACTERS 212,214 8 2312, ON Pines "6-10". CRARACTERS 

:*241-277" ARE DISPLAYED ON THE LAS LINES. 

eSseemtrn et ttn Ho ecti irene ernrerenrereetrens 


VTMOD1: MOV #VTMOD1 , RETURN 
DISPLAY 


3 TEXT 'VT FIELD CONTROL TEST’. 
LOAD ‘VT’ BUFFER WITH "VISIBLE EOS’. 


vine KSTOR1 

INTSWH ;CLR SOFTWARE SWITC 

&-3,KSTOR3 ;SET UP FOR '3° ers OF CHAR.’S 
PC, VTMDIA . ;LOAD CHAR.’S 


VTMOD1 
VTMOGe ;G0 TO NEXT TEST IF SW. IS SET 


PC, INTCHR , sCRER TE aN Loap CHAR eo 
SED OF LINE RETURNS HERE 
; :SET UP 4’ LINES USING ALL MODES 
RO, KSTORI | :SAVE ST. ADDR. FOR NEXT SUFFERED LINE 
KSTOR3 . >FINISHED? 
; BNE ViMbIa ?NO, CREATE NEXT SET 
HERR tee iene erenecnenecnenne bene beeneenenneneeneneeaeaneies 


SET’ TEST (3) 
Tals se Erin fete THE VT’ CHARACTER SET IN ALL FIELD CONTROL MODES 
B UNDERLINE). THE FELD CONTROL £S SELECTED VIA THE 


 caseasEbSSERGaSSOGaECESELSAEEEASSEG#2 9004 E7}000000000000000000400000008 
VTMOD2: MOV SVTMOD2 , RETURN 
DISPLAY 


PC 


A ‘VT’ CSR PRESET TEST’. 
AD ’VT’ BUFFER W/ °E0S’. 


MES39 ; TEXT *BOLD PRESET ist" 
VTMD2A: ; SELECT *BOLD’ PRESET & GO 
;LOAD CHAR.’S 


sTEXT *BLINK PRESET TEST’ 
;SELECT "BLINK’ PRESET 
(AD CHAR. 'S 


iret * BLANK PRESET. Test" 


SEBS ous 


MOV #4001, aVTCSR is PT MRE ice er 
JSR PC, VTMD2B " sLOAD C 
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SRaoKs-RRe 
ee aaanas 


ss 


BR 
a 


2 
= 


229 
Shses 


a8 


Be 


Le 
gag 


o0s4s4 
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pe VTMOD2 ;RE-CYCL 
VTEOL i Banc Fo NEXT TEST IS SW. SET 


VTMD2B: CLR INTSWH ;CLR SOFTWARE S 
JSR PC, INTCHR ;CREATE & DISPLAY CHAR. 


R .-6 a LOOP UNTIL SCREEN IF FILLED 
Reet ac Biro: DELA 
yess ttovn Seeyennesseenerneelsanerenoveseennetneensetsos 


iTars s Tegt TESTS. THAT THe HE. "END OF LINE’ CHARACTER CAN BE PLACED IN 
HE ’ 1024’ CHARACTER Post Ione ON THE SCREEN. THIS IS DONE BY 
STARTING ALL 1% LINES WITH A "VISIBLE END OF LINE’ CHARACTER AND 
THEN INCREMENTING THESE CHARACTERS ACROSS THE SCREEN. 
73H HHH HSIEH ISHII IE Ia 


VTEOL: MOV #VTEOL, RETURN 
DISPLAY 


;TEXT 'VT END OF LINE TEST’ 
*LOAD ’VT’ BUFFER & START 
Ri CLR Lie CNT 
#VISEOL, (RO)+ RMINATE NINE. W *EOL’ 
a SAVE *63’ BYTES BEFORE NEXT LINE 
{R0}+ 


.-4 
RI s INCREMENT LINE CNTR. 
#17.,R1 :DONE 16° LINES 
RESCAT =NO, CREATE NEXT LINE 

:DISPLAY THE 1ST 3 LINES OF. ‘EOL 


sAT mie POINT ié un ig Cranes 1 *EOL’ AND 63 SPACES HAVE 


WITH AN °# MOVING 
INTO THE NEXT SPACE UNTIL THE ENTIRE LINE HAS BEEN CHECKED. 
a). S ;SET UP FOR °63’ SHIFTS 


SRHEOL: ft ‘ 
MO SUTBUFE.AR RESET BUFFER ADDR. POINTER 
SHFEOL: tha), WWISEOL :SEARCH BUFFER FOR “EOL” 


ise -(RQ) ;REPLACE EOL) W/ rx? 
(ROS+ *RESET POINTER 
aVISEOL, (RO)+ Doe "ED," OVER ry? 
SHFEOL iPr text gh 


ioe ‘eg Sirs 


TEOL YES RESTART TEST 
SIC aa emeppeminanmmamaainamaaonsen ern 
;THIS TEST TESTS THAT THE ‘VISIBLE END OF SCEEEN’ CHARACTER CAN 


5 
SRHEOL 
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2400 
San 


NER GRRE S RT ROBIREeE 


PErPereeer eee 
RECT ze 


= 


save 


005574 d2040e 


El 


000056 
000231 


005660 


000361 
002000 
00000! 


000052 
000361 


173654 


020402 


173574 
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;BE PLACED IN ALL ’1024’ CHARACTER POSITIONS ON THE SCREEN. Pas 
die BY FIRST te + poey ING THE BUFFER TO BE DISPLAYED WITH 
ION MARKS OS’ CHARACTER IS THEN INCREMENTED THRU THIS 
FER REPLACING "hE QUESTION MARKS BEHIND THE ’E0S’ CHARACTER WITH 
Sr sebinanienssenepenaieeinmentasnanneenanensiennsianninanatsaiatinninamenel 
VTEOS: MOV o #VTEOS, RETURN 


;TEXT ’VT END OF SCREEN TEST’ 


D 
Mee3p 
PRELOAD *PRE-LOAD THE BUFFER WITH °?’ 
.BYTE 77 
“BYTE 
MOV #1024. RI ;SET UP CHAR. CNTR. 
MOV #VTBUFF , RO -SET UP BUFFER POINTER 
MOVB  sVISEOS'(RO) §§ ;LOAD 1ST CHAR. WITH ’E0S’ 
MOV #1, aVTCSR *ST DISPLAY 

SRHEOS: DELAY 
DEC Ri sDONE 
BEQ ENDEOS YES, EXIT 
MOV #56, (RO)+ NO, REPLACE THE ;EOS” W/ DOT. 
HOVE #V15E0S, (RO) *MOVE "EOS’ OVER ’1’ PLACE 


ENDEOS: ENDTST 
BR YTEOS ;YES, RESTART TEST 


i” ana na ee ee oe ees 


7V ( 
sTHIS TEST ren S THE "BLANK” CONTROL CHARACTER (361) THRU A 
Pr ee na OF ?’S. THE SCREEN STARTS BLANK AND END’S 


J osevdduccesesduanusueennunausuveconsnusesnecesensusnnuseasnnsiausensenseas 


VTBLANK : MOV #VTBLANK , RETURN 
DISPLAY 


MES3I | TEXT *VT BLANKING’ TEST 

PRELOAD sFREL ORO DATA BUFFER 

‘BYIE 97 Sn 

MOVB $BLANK, (RO) i UP BLANK CONTROL CHAR. 

MOV #1024. °R1 SET UP CN TR 

MOV #1, av7CSR ST. DISPLAY 

_ DELAY *3 SEC. DISPLAY DELAY 

MOVBLK: MOVB (RO)+ “REPLACE, *BLANK’ CHAR. We 

HOVE SLANE (RO) *MOVE "BLANK? CHAR. UP °1° 

DEC ;MOVED 'BLANK’ THUR BUFFER 

BNE AA VBLK sNO 

ENDTST 

BR VTBLANK ;RESTART TEST 


| SUSSSBELEROSEENEUD ODE QUUUEEEREAUNEUEEUSAANNERENOSERENEDUDERDDNELOSERSUUEEIOOURE 


;VT_ *ALIGNMENT’ TEST 
HIMES Test Soak AE a FULL SCREEN OF THE CHAR. 'E’ TO ENABLE A VISUAL 
Pirie ree meters reenter t rere 
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Sues 00S740 tht 005740 020402 VTALIN: pve ay #VTALIN, RETURN 


ness ;TEXT ‘VT’ ’ALIGNMENT’ TEST 
PRELOAD sEREL OGD ’VT’ DATA BUFFER 


ea 


se 


173526 3ST. DISPLAY 


104023 
000765 


— 


BR VTALIN 
“URL gD eens agen reer 


THIS rer Says A FULL SCREEN OF ALTERNATE #’S & 1’S TO ENABLE A VISUAL 
5 SER 


SER PRRR Rac iota ttt 


005766 012737 005766 Oe040e VTFOCUS:MOV #VTFOCUS, RETURN 
005774 104000 DISPLAY 
peers 3451 MES34 _ sTEXT °VT FOCUS TEST? 
104011 PRELOAD LOAD *VT’ DATA BUFFER 
O0600e be BYTE 52 :MITH ns 
es BoeDos nosso? 173500 ines SVTCSR :ST. DISPLAY 
2480 905010 104023 THEND 
se 006012 000765 BR VTFOCUS 
2483 j REREEEESSE LEER ELAR ESLER ARLRA ELE EL ERE LE EEE L LEAL AAR E REAL ERA R LEER EERE EES 
e4R4 VT WORST CASE’ (1 
e4es THIS TEST DISPLAYS A FULL SCREEN OF THE WORST CASE PATTERN '125 & 252”. 
BS 1G HEHEHEIHE GHEE HHEHHHEHEHHHEHEHEHEHHHHEHEHGHHIHEHEHEGGHE IEEE ee ae ae 
2488 006014 012737 006014 O20402 VTWORST:MOV #VTWORST, RETURN : 
e489 O060e2 104000 DISPLAY 
sige pees? 023471 ieee 3 TEXT °VT WORST CASE TEST’ 
91 104011 LOAD LOAD ’VT’ BUFFER W/ WORST CASE 
e492 006030 12S BYTE 125 . ' CHAR. 125 
2493 006031 ese -BYTE eS2 ;CHAR. 2Se 
e494 O00603e 005277 173452 INC avTCSR «sss $ ST. DISPLAY 
95 eae 104023 T 
3 6S BR 
2497 PTUiiitiriiitiiitiitiittititii ttre reer eter 
2498 ;VT_ "CURSOR MOVEMENT’ (12) 
2499 THIS TEST 3 TS THAT THE CURSOR CONTROL CHARACTER CAN BE PLACED 
e500 IN ANY POSITION ON THE SCREEN.THIS IS DONE BY DISPLAYING A "CURSOR EOS’ 
3 Ee I ae Het itag Meer he ie fe Geen he 
e503 s ENTIRE CREEN WILL Be NPTELED #’S. 
sent :  eRseaassedisussbbecsucsdsaseesecureTiusucuseuecenssususuecesecseesssnesteus 
2506 O06042 012737 O06042 O20402 VTCURSR:MOV #VTCURSR, RETURN 
_ 2507 006050 104000 DISPLAY 
5209 Boeoss 1O01 PRELOAD es ; PRE Lond "THe BUFFER WITH MOSMENT a 
Si ee Bs sf ent 


ee eee ee -_ — « 
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oBYTAC 


TAC.P11 
sole vl tee poeeen 
Sit Hoe bine teas 
Sie Hite BEA? BL ro 
e517 006106 1 
e518 006110 005301 
2519 pelts Breen 
Bs EUS Hise | 
eSee 006124 012710 000231 
3 130 9007! 
l3e 104 
134 90074 
2526 
2527 
e528 
e529 
2530 
2531 
e532 
2533 006136 012737 006136 O20402 
Sc be ue 
Se es ee BE roa 
2538 BOE Le? 005277 173322 
2539 O06166 194023 
eS40 006170 O0076e . 
cau 006172 O004e1 
2S43 
eS46 
es47 
. 2548 006174 013704 001474 
2549 006200 037 de4450 
e550 O006e04 O1e737 O00400 020376 
2551 O0bele Risse RAS uae hen 
Ss tee tive iat ie 
SePe 006234 000207 
eSS& 006236 104000 
2557 006240 021245 
. 2558 O0be42 737 006174 
ess9 
2560 
e561 
este 
2563 
2564 O06e4% O00240 
2565 ppP ses 000240 
eS66 O06eSe 000005 
2567 O006e54 005714 
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#1024. Ri ;SET UP CHAR. CNTR. 


MUV 
V AY TBLFF RO -SET UP BUFFER POINTER 
MOV TCAR reer CURSOR EE REG. 
MOV avis (RO) hans 1ST CHAR. WITH *EOS’ 
MOV VTCSR 
SHFCUR: DELAY 
DEC 
HOY BSB ROD 0S’ Wy DOT. 
MOV RO. aVTCAR ea ACE THE Stay WITH *EQS’ 
MOV #ViSEOS,(RO) © MOVE EOS’ OVER °1’ PLACE 
BR SHF CUR 
ENDCUR: ENDTST 
BR VTCURSR YES, RESTART TEST 


DOS nt eee eee ere erento) 


;VT_°ODD ADDRESS’ TEST (13) 
s THIS rest hg DierLavs A MESSAGE WHICH IS LOADED FROM AN ODD 
Pertirtitiiititttiiiiiiitiiitittiiititititiiititttitititttiitititittitttte 


VID: Oe SLAY #VTODD, RETURN 
, — ;TEXT ’VT ODD ADDRESS TEST’ 
Cc ; STOP DISPL . 
MOV meet, ,@VTSAR ;LOAD *SAR’ W/ MESSAGE FROM ODD ADDRESS. 
a av START 8 BIsbLAY MESSAGE 
BR VTODD 


BR FKLOGIC ONTINUE TO FK LOGIC TEST 
suveaneneeneuneateaneoneaeeyeeabeneepeaneaneaneeneenenseeeeaventeceeneaseeseay 


sFKtd FUNCTION KEYBOARD LOGIC TEST (15) 
THIS 13 AN OPERATOR INTERVENTION TEST WHICH TESTS THE FUNCTION oo LOGIC. 
TS ARE MADE FROM THE PROGRAM FOR INPUTS FROM THE FUNCTION KEY 


s SSHSSRTUSSUESESIESSUGENSIESESSOENSTEFEESSSENENSOEOTEGSSSEREONEEO SST ES EEEEE 


SETUPF: MOV FKCSR, FKCSRY ;MOVE °CSR’ ADDR. 
CLR PRt :CLR PRINT I RSET Su 
#400, ICOUNT s INITIALIZE THE ITERATION COUNT 
MOV #FKERR, #34 LOD TRAP’ VECTOR FOR ERROR HANDLE 
MOV aFKTL RETURN THE RETUR N ADDRESS FOR SCOPE 
MOV #1, TSTNUM Phir UF eat NO. 
RTS PC 
FKLOGIC: DISPLAY 
sTEXT "FK LOGIC TEST; 
ISR PC, SETUPF ‘INITIALIZE THE *FK’ LOGIC TEST 


5 REAR AERA EAE ARH E EERE E EEE EERE EEE E EERE EEE EEE EERE REAR EEE REE ERE EEE 
ISSUE "RESET’ AND CHECK THAT THE ‘CONTROL REG. IS INITIALIZED CORRECTLY 
HEHE EHHHHEGHH EE HEEB HEHEHE EHH HBHHEHEHHBHEE HEEB HGH HEE 


FKT1: NOP ;FK TEST °1" 
NOP 
RESET 
TST aFKCSRY ; RESET’ SHOULD OF CLEARED REGISTER 
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pee FKT2 ;BRANCH IF Sueeee 
RROR sFK ’CSR’ WASN’T CLEARED VIA ’ RESET’ 


)EHEGHHB HEHEHE HEHEHE EEE HEHE HEHEHE HEH HEHEHE IEEE 
;TEST THAT THE ’ERROR’, "ASCII FLAG’ C WRO 
Lope ares pene re vee ye 


FKT2: TEST 2 
5 #177668, arxesey ** “WRITE ALL 'CSR’ BITS EXCEPT ’6’ TO 1’S 
#2000 RO ;CLR_ INTERVAL TIMING BIT 
#100201 , RO sTEST IF BITS °15,7,0° SET 


;BITS °15,780’ FAILED TO WRITE TO 1 IN ’CSR’ 
#12, IFKCSRY CLR FLAGS 


Rott a gee age age a aera ermmcecemnees 
ISICRRESGMERT Cpe emer TET ener eT TRRO Tr eet erpen tort 
FKT3: SCOPE,3 ;°FK’ ge 3 

IS #177665, aFKCSR4 ;WRITE ALL ‘SR’ BITS TO *1’ 


B 
CLR aFKCSRY WRITE BITS TO ’0’ 
aM #1, aFKCSRY ;TEST IF ’GO’ BIT CLEARED 


+4 
Sry By Fox BIT DIDN’T CLR 
supeenvenneaesdeediennseaneanneseeneehieayeaneeseeayensveaneestentey 
TEST THAT THE "ERROR’, ’ASCII FLAG’ & 'GO’ BITS CAN BE CLEARED VIA ‘RESET’ 
 LEEEAHeEEAEDEAUESESaAMUASSSEuRGEEEEESEEERAETEEPESEEESTiSSeSEESENETEEES 


FKT4: SCOPE,4 ;°FK’ TEST 
Bae a" #177665, JFKCSR4 >HRITE BITS TO 1 


TST aFKCSRS ;TEST IF ’RESET’ CLEARED *CSR’ 
‘ RESET FAILED TO CLR ’CSR’ 
STECT THAT THE VINTERVEA, TIMER’ Fife DOESNT GET IF Go’ le eamen 


;TEST THAT THE "INTERVAL TIMER’ FLAG DOESN’T SET IF ’GO’ IS CLEARED 
Mitt iiiiiiitiitiitiittitiitiiiititititiitititittititetttittttt titi it 


FKTS: SCOPE,S ;°FK’ TEST S 
MOV #-2000, RO ;SET_ UP WAIT LOOP 
RO ;WAIT FOR INTERVAL TIMER FLAG 


4 
#2000, dFKCSR4Y 
+4 


s INTERVEN. TIMER FLAG SET W/GO CLEARED. 
#12, dFKCSR4 ;CLR FLAGS 


spensuussussuecyossessecucoeceyounuscsetTeeesssuessenensaunneenecuenens 
:TEST THAT THE "INTERVAL TIMER’ FLAG WILL SET IF GO IS SET 
pram mecicirmtecemcrertr mr er ercartanr enters 


FKT6:  SCOPE,6 ;’FK’ TEST 6 


URED 
0 00 NICU ££ WIT C 


% 
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& ay en Saat a es ve Pike cnmce 0 se 
oa the 


B ee 
002000 iT #2000, 3FKCSRY ; TEST IF FLAG SET 
se Baton Bieta ; 
ces OO644O 104400 ERROR 5 INTERV. TIMER FLAG DION’T SET W/GO SET 
2631 O0644e 012714 0000le MOV #12, dFKCSR4Y ;CLR FLAGS 


13H EHH HHI GIGI IIE TRIE 


:TEST THAT THE INTERVAL TIMER FLAG CAN BE CLEARED VIA SETTING BIT 1 
Piretiti titi trttitiitittiititiittittiitiitittittitt iit titi titi tet tite 


000007 FKT7: SCOPE,7 ;"FK’ TEST 7 
000001 1S” #1, FKCSRY ;SET_’GO’ 
002000 BIT #00, aFKCSRY sWAIT FOR FLAG 
999001 BIC #1, 3FKCSRY ;CLR ’GO’ 
0002 BIS «#2 SFKCSR CLR INTERVAL TIMER FLAG 
002000 BIT se000, aFKCSRY ;SEE IF FLAG CLEARED 
ERROR TING BIT '1’ DIDN’T CLR INTERVAL FLAG. 


OR 
[eRe i peaersaaaeenanreaanensanesliatienpiinnaatannaeansainens 


;TEST THAT ’RESET’ WILL CLR THE "INTERVAL TIMER’ 
Fret riiiitiitttiiiiiitittitiitiitiititiiiititititttitittiti titi tities) 


000010 FKT1O: SCOPE, 1 s’FK’ TEST 10 
900001 eit i aFKCSRY SET 'GO’ 
BI e000, aFKCSRY *WAIT FOR FLAG 


RESET ;CLR FLAG W/RESET 
pe zexcse sRESET SHOULD OF CLEARED REG. 


;’RESET’ DIDN’T CLR INTERVAL FLAG 
5 EERE AKER ER EKER EEE K EEK RHE EERE E EAE EERE RAE A LEAR EEE LEE ER EE EEEEEE 
T THAT THE INTERV 


TIMER FLAG CAUSES AN INTERRUPT WITH PROCESSOR PRIORITY a O 
Pritt itittitiititttirtittitttiititttittiitittiiiiiititititret tits 


000011 FKT11: SCOPE,1 ;’FK’ TEST 11 
176000 MOV 1-200 RO *SET UP A WAIT LOOP 
016654 JSR PC, LOFKVT -SET UP ’FK’ INTR. ADDR. 
TAGA * INTERRUPT SERVICE ADDR. 
INC RO, “WAIT FOR INTERRUPT 
ERROR i. s INTERVAL TIMER FLAG DIDN’T CAUSE INTERRUPT 
TAGA: POPeSP ~ RESET THE STACK 
016710 JSR PC, CLRFKV *CLR ’FK’ INTR. ADDR. 
i ecT THAT NO’ INTERRUPT OCCURRS IF co’ Is clemke> re 
“TEST THAT 'NO’ INTERRUPT OCCURRS IF ’GO’ IS CLEARED 
 casuvenuseotaanescorseuesscecssussuucvaussecticrrseuseusnussceceesens 
oo0012 FKT12: SCOPE,12 :*FK’ TEST 12 


006630 172700 MOV #TAGAB, JFKINT ;SET UP THE INTERRUPT ADDRESS 





M DIAGNOSTIC TEST PROGRAM MACY11 27(732) 14-SEP-76 10:32 PAGE 49 


006600 012777 000340 172674 MOV #340, OFKLVL 
1 MOV #-2000, RO ;SET UP A WAIT ohOoe 

i 17 CLR aPSW “CLR PROC. PRIORITY 

16 012714 000100 = MOV #100,aFKCSRY SET INTR. ENABLE 

22 00 INC RO 

001376 BNE 2 . 

006626 O00402 85R o” Sey 0K, NO INTERRUPT OCCURRED. 
006630 O226e6 TAGAB: POP2SP RESET THE STACK 
006632 104400 ERROR : INT ERRUPT BCCURRED W/ GO’ CLR 
006634 ‘CLR 'FK’ INTR. ADDR. 


004737 016710 JSR CLRFKV 
; JERE EERE rE EEE BEB EEL Ee 
;TEST THAT 'NO’ INTERRUPT OCCURS WITH PRO PRIORITY °4’ 

|S HS 


40 so4ooL O13 FKT13: SCOPE,13 ;°FK? TEST 13 

44 0127 172626 MOV #TAGB, IFKINT ‘SET UP THE NTERRUPT ADDRESS 
006652 012777 172622 MOV #340, SFKLVL 
OOBEEO 01 176000 ey #-2000,R0 ;SET UP A WAIT LOOP 

01 172420 MOV #200,aPSW SET PROC. @ PRIORITY ‘4 

ze 012714 000101 Moy #101, aFKCSRY SET INTR. ENABLE & G 
006706 001376 BNE 2 
006702 o0040e BR "+6 No INTERRUPT OCCURRED. 
006704 022626 TAGB: POP2SP 20K, NO, THE STACK 
908706 194400 ERROR t INTERRUPT OCCURRED W/ PROC. 3 PRIORITY °4’ 
006710 004737 016710 ISR CLRFKV “CLR ’FK’ INTR. ADDR : | 


veeveneehieveeneesdenseneapeeneaeeseenbestenvenuerseipenseseeaventegs 


TEST THAT *NO’ INTERRUPT OCCURRES W/ PROC. @ PRIORITY 
Titi titi tiitittiitiitiitititittiiititittittittitititit titi iit titi ett 


006714 104001 o00014 FKT14: SCOPE,14 s*FK? TEST 14 

006720 012777 006760 172552 MOV #TAGC, IFKINT SET UP THE INTERRUPT VECTOR 

005726 ch 000340 172546 MOV #340, OFKLVL. 

006734 01 176000 MOV - -2000, RO -SET UP WAIT LOOP 

006740 012777 O00240 172344 MOV #240, aPSW :SET PROC. a PRIORITY ’S’ 

006746 012714 000101 MOV #101; aFKCSRY SET INTER. ENABLE & GO 

006752 INC RO 

006754 001376 BNE - 

006756 o00402 BR "+6 ;0K, NO INTERRUPT OCCURRED 

006760 Oe2be6 eles TAGC:  POP2SP - SRESET STACK POINT 

008762 104400 is. ; ERROR Fk INTERRUPTED WITH PROC. @ PRIORITY °S’ 

006764 004737 016710 JSR PC, CLRFKV CLR ’FK’ INTR. ADDR. 
STECT THAT THE INTERVAL TIMER FLAG 16 SET APPROXIMATELY EVERY "Sou" Use 
*TEST THAT THE INTERVAL TIMER FLAG IS SET APPROXIMATELY EVERY *SOO’ USEC. 
 STESSSTEMSSESASEESUSEUSEGISSSELESSNEESEREESSEEeaEETTEEYEOEEETES HERTS 

006770 104001 coooIs FKT1S: SCOPE,1S :°FK’ TEST 15 

006774 005001 LR RI | 

776 004737 O166S4 JSR PC, LDFKVT ;SET UP THE INTR. ADDR. 

007002 007010 TAGFA 

007004 005201 INC RI 

007008 001376 _ BNE -2 

007010 O22626 TAGFA: POP2SP ;RESET ST 


ACK 
007012 004737 016710 JSR PC, CLRFKY CLR 'FK’ VECTOR ADDR. 


—_—— ee mes o - ~- 
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022701 d00400 CMP 2 ;CHECK LOW Se 


LOS ; 
ERROR iYireelat ctBa FREQ. TO FAST 


* 
a girs tERENCH TF LOWER 


ee H 

ERR : INTERVAL CLOCK FREQ. TO SLOW 
ee ETT et TT tert re errt re 
;TEST THAT 'CLR ASCII’ (BIT3) WILL CLEAR THE KEYBOARD FLAG & ERROR BIT. 
5 SESE IESE SE SESE SERIE SEE SE SEE SEE SEE EE EEE REESE ESE EAE EE REE EERE EEE EER EEE 


FKT16: SCOPE,16 ;°FK’ TEST 16 
BIS #100200, dFKCSRY ;SET_ THE KEYBOARD FLAG 
aFKCSRY TEST THAT DONE WAS SET 


; DONE” DIDN'T SET 
#10, dFKCSRY :SET ’ 
#190200, aFKCSRY TEST IF FLAGS CLEARED 


;SETTING BIT 3 DIDN’T CLR ASCII FLAGS 


5 EE KKKAA RARER AER EEE EERE ERE EEE EEL EEE EEE E EEE E EE ELAR EERE REESE 
;TEST THAT THE KEYBOARD FLAG IS CLEARED WHEN THE KEYBOARD DATA IS READ 
itttii ii titi titi tt titittttitiiitttittiiti titi tttiti tert iti t ttre ty 


000017 FKTI7: SCOPE,17 ;"FK? TEST 17 

000201 BIS #201 aFKCSRY ;SET THE KEYBOARD FLAG 

172370 TST .- KDATA ; READ KEYBOARD DATA 
arcs :RE-TEST IF FLAG CLEARED 


1 sREADING KEYBOARD DATA DIDN’T CLR FLAG 
oi27i4 oo0012 #12,3FKCSRY CLR FLAGS 


Be EEE LeC Een E at hee iter Mette 
;TEST THAT THE ’ERROR’ FLAG IS CLEARED WHEN THE KEYBOARD DATA IS R 
PTTttiittiti titi titi titi tittiti titi rtitiititt tte ti titi ities 


104001 000020 FKT20: SCOPE,20 ;°FK’ TEST 20 
052714 100001 BIS #100001, aFKCSR4 :SET THE ERROR BIT 
TST a pei TEST THAT ERROR SET 


con nyt SET 


172334 TST aFKDATA READ He Ke VBR DATA 
oe ail - $RE-TEST THE ERROR FLAG 


;READING KEYBORRD | DIDN’T CLR ’ERROR’ 
aFKCSRY CLR 'GO’ 
000012 BIS #12, aFKCSRY CLR FLAGS 


"  €LR - NT » RUN FOLLOWING TESTS °1’ PASS ONLY 
Stil iiliiiii 
‘TEST THAT THE KEYBOARD FLAG CAN BE SET VIA THE KEYBOARD. 

5 ERG 


104001 000021 FKTe1: SCOPE, 21 ;’FK’ TEST el 


020376 








on 


a3 


at 


ST Stas e 
we £3 


Pen 


qo 


RAL 


ruarururorury 
fo 
ule 


3~3~ 3-3" 5 
Pinan 
IQuUI 


10 


iy 
SB 88 
ini 


-~ 


Lf) 
Sore 


epryeyrny 
eee 
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ees 
On CU) 


Bo 


yaar araoaraaa 


ah 
0 


f 


(9.000 OU. Lotue- 


282 
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002000 172ie4 
pe 020402 


000012 


000022 


172220 
177773 
0 

00912" 


900923 
000201 


172150 
177773 


ocoole 
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BiT #2000, dSWR :15 MANUAL INHIBIT SW. SET? 
BNE FKTO4S4 sYES, TES COMPLETE 
MOV aTAGFH. RETURN BESET SCOPE ADDRESS 
TAGFH: BIS #1, aFKOSRY :SET "GO" 
DISPLAY : 
MES ' sREQUEST CHAR. 
CLR avTcsr :CLEAR MESSAGE 
MOV #-5,RO 
TAGH: CLR ae 
INC Ri} 
BNE 72 
INC RO 
NE TAGH 
iste oF KCSRS ;TEST IF KEYBOARD FLAG SET 
ERROR _ ;KEYBOARD FLAG DION'T SET 
MOV 812, IFKCSRY :CLR FLAGS 


s PEPERRASSRALEREALARRELE RELA ALLELES AR AARA SERA AEE ES ELLE SS 2 4 224524444444 


;TEST THAT THE "ASCII® FLAG ISN°T SET IF °GO* IS CLEARED 
pERERERESAEERERESASERERLE RED ERR RARER LESSEE EA REESE ELSE SESE ES ESSE EE SEES 


FKT2e2: Be Ore 22 ;°FK* TEST 22 
ISPLAY 
MESSA 


;REQUEST CHAR. 
;CLEAR MESSAGE 





CLR aVTCSR 
TAGAH: CLR 1 
INC Ri 
BNE -2 
INC 0 
BNE TAGAH 
TSTB aFKCSRY ;TEST IF KEYBOARD FLAG SET 
BPL +4 
ERROR 


;ASCII FLAG SET W/ *GO*CLEARED 
MOV #12, dFKCSRY ;CLR FLAGS 


v 
5 RAEERAEREEERAEEREAEEEREERESED SERRE EEER ERAS REELS EERE AEEREERERSER EES ERE 
;TEST THAT THE ERROR’ FLAG IS SET IF THE KEYBOARD FLAG ISN’T CLEARED 
; ERERERRERESELLLALALLRARRERESELARARERRELELERERAERARALSEALERERARRLLELEEE 





FKT23: SCOPE,22__. :'FK’ TEST 23 
MOV’ #201, aFKCSRY : SET *GO° 
DISPLAY 
MESES SREGQUEST CHAR. 
CLR avTCSR ICLEAR MESSAGE 
Hoy 8-5, RO 
IN 
NE AGI 
TSI aFKCSRA TEST IF "ERROR SET’ 
ERROR sERROR DIDN'T SET ON 2ND CHAR. 
CLR @FKCSR4 ICLR "GO" 
BIS #2, IFKCSRY SLR FLAGS 















VT20 SYSTEM DIAGNOSTIC 
DBVTAC.PLi 







TEST PROGRAM 


ocod24 


0931¢e2 
006236 


007416 


o1e6s4 


172016 
000003 
001000 


“171786 


24442 
o24442 
171742 
Oe4442 
e442 
171722 
171714 
000012 


020402 


172010 


171712 


;PUDERSUESEAASENDEEEEUEAHOEEAEELOREEEDEOREEDOOOOERELENOEERED TEED EDSOEESHEEH ESE 
ST. 


sEND OF *FK* LOGIC T 
WETTITTITITITITITITITITITITITITITITIIITITLITL LILLIE LLL LLL 


FKTe4: 


sEKLL EUNCTI SWITCH 
:THIS. 1S_6N PERRTSR yy ON TEST WHICH MONITORS THE FUNCTION KEYS. 
RFS SARE STRUCK i ofeiltons, We Function wes, 

deta is ens 115 STRUCK A SECOND TIME THE CORRESPONDING FUNCTION 
eee nnn dbeecannpesunsennsabenenenuneueusespensensnonennonssestautausial 
FKFUN: MOV 8FKFUN, RETURN 

DISPLAY am 

MES! ;TEXT *FK FUNCTION KEYBOARD LIGHT TEST’ 

| oe ICLR WORKINGS REG’S ) 

ccR RI 

CLR sR 

JSR PC,LOFKVT © =; LOAD THE INTR. ADOR. 

SRRV SINTR SERVICE ROUTINE 

WALT é SUALT POR INTERRUPT 


s;ROUTINE TO *SERVICE’ FUNCTION KEYBOARD INTERRUPTS 
SRRVFK: iN 


18: 


SRYFOB: 


EXITFO: 
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SCOPE, 24 ;"FK’ TEST 24 
DISPLAY x 
MES? sTEXT “LOGIC Ok; 
_ % ;END OF TEST 


IMP 
JMP 
aueeeashaneasnuenssenssenssansesecesouehanecncenguensensscnstenseensees 
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VTLoGIC START T Sar LOGIC TEST 
FKL RERUN : FR LOG Pmt 





















Re ;INTR. CNTR. (EVERY 1000, LITE DATA UPDATED) 
aFKCSR 















l 
#3, JFKDATA sCONTROL C TYPED? 
EXtTF1 jIF SO-EXITFL 
$1000, Re SERVICED. "512° FLAGS? 
EXITFO :NO, EXxIt 
2 CLR CNTR. 
3FKLDA, RY ?READ SWITCH DATA ’A’ 
RVFOB ih. Data PRESENT? 
RO, SAVOLD Po Reset 
ark Fae ORRE SNOT Brrs IN *OLD® NO. 

SAVOLD, R4 :CLR ALL SPONDING BITS IN *NEW’ NO. 
RY, : SET RERAINGNG BITS FOR "NEW" VALUE 
aFKLOB, RY !READ SWITCH DATA *B' 

ITFO SW. DATA PRESENT? 






EX 
R1,SAVOLD 








CLR ALL CORRESPONDING BITS IN ’OLD’ WROD. 
SAVOLD, RY :CLR ALL CORRESPONDING BITS IN ‘NEW WRO. 
4,R1 SUPDATE "OLD" WROD ITH * NEW WRO. 
RO; JFKLDA ; TRANSMIT UPDATED LIGHT DATA *A" 
Rl’ aFKLOB : TRANSMIT UPDATED LIGHT DATA °B' 
sO aFKCSR CLR FLAGS... 
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Sane as BE om O008i2 i71702 EXITFI: Bes #12, dFKCSR 


KEYBORE CHR ER eT nnn ee tn tre te, ut raomn 







"290 iy 

5213 an TEST mere T t ALL CHAR ACTERS CAN BE TRANSMITTED VIA THE FK11 KEYBOARD. 
2911 ' ie I NEES n fee T 4 “READY FOR it Tee IS a AYED ON THE ‘VT". 

ais | ite S OF nee 

31 CO Naas “CANT START NG_AT T peak Bite THE 

$14 ne rico R_TRANSM T . FROM THE K YBOARD IS_ VERIFIED 
Sai? os rok Ea ter 8 rFER_AND pISe LA ON THE ° IF_THE TRANSMITTED 

1§ OESN’T MATCH THE EXPECTED CHARACTER AN “audT0" *BEEP’ IS HEARD 

esi? ER HARE TER IS DISPLAYED IN BOLD RLINED. ALL CHARACTERS pec IVER 
23:8 fa firs POINT ON WILL BE TRANSMITTED IN wee er nig EITHER THE CORRECT 
e919 TER CODE _IS a ee = DATA 'SW1S’ IS SET TOR ’ ALLOWING THE PROGRAM 







2920 Q CONTINUE. DATA ’SW14’ MAY ALSO BE SET TO A I AT ANYTIME TQ LOOP ON 
















} Pass | sO. CURRENT CHARACTER. 
5655 ; SF ITirttiiiriit iii titi titi tritititiititititiiititititiitirerititititttri titi tite 
2924 007576 018737 007576 O204C2 FKCHAR: ee #FKCHAR, RETURN 
S35¢ BOSE SE Fett, 4 : TEXT 'FK CHARACTER TEST’ 
2927 007610 012701 o20457 MOV SCHRTAB-1,R1  :SET UP CHAR. TABLE POINTER 
2928 907614 005037 924150 CLR FIELDSW 3CLR FIELO CONTROL SOFTWARE SW. 
2929 005937 Ooe4444 CLR TEMP :SET UP SOFTWARE SW.’S 
2930 007624 O24446 €LR TEMP 

1 095037 Oe4464 CLR KSTORI 
2932 004737 016654 JSR PC, LDFKVT sLOAD 'FK’ VECTOR ADDR. 
2933 007646 CHKFKO 
2934 097642 OCO001 . WAIT sWAIT FOR °FK’ INTERRUPTS 
2335 007644 000776 BR 2 
$237 sENTERED HERE ON °FK* INTERRUPTS 
2939 OO7646 105777 171622 CHKFKO: TST aFkcSR ae ASCII FLAG SET? 
2940 007652 100071 : BPL INTERVAL TINER FLAG 
2941 O07654 117702 171616 MOVB § @FKDATA.Re RENO 3 8 SAVE DATA 
2942 | o57660 032777 O40000 171436 BIT 8SW14, ISWR 315.7 OP Su. SE 
234 001007 BNE CHKFK1+2 : YES, HE On T UPDATE POINT ER 
2944 007670 37 024150 TST FIELDSW NO, IS THE ERROR FLAG SET? 
2945 007674 001403 BEQ CHKFK1 :NO, UPDAT E POINTER 
2946 007676 77 171422 TST aSWR Me SCOPE SW. SET? 
2947 007702 1 BPL CHKFK1+2 - yes? [Bop ON CURRENT CHAR. 
2948 105721 CHKFK1: TSTS  (R1)+ . =UPOR TE POINT 
2949 007706 120211 CMPB sR, (RL) SBOE URE CHAR. RexPT" D CHAR. 
2959 007710 001073 : CHRERR :NO CHAR. e 
2951 007712 005737 o24150 TS FIELOSW - 21S FIELO SW. SET? 
2952 & 001404 BEQ CHKFK : NO 
e353 007720 005037 o24150 CLR FIELDSW YES, CLR IT 

4 007724 112720 000360 MOVE #360, (RO)+ CLR'FIELD CONTROL CHAR. 
2955 007730 Oe2702 000033 CHKFK2: CMP #33,Re 
2956 007734 001403 BEQ +1 
2957 007736 9057 37 o244e4 TST KSTORI DOING CONTROL PASS? 
ese8 007742 Ool140e BEQ +6 =NO. CONT 






NU 
e959 007744 OSe702e 000100 BIS #100,Re ;YES, AOD BIT SO CHAR. IS VISIBLE 





VT20 SYSTEM DIAGNOSTIC 
DBVTAC.Pil 


BBeHe 
omMo 


Sue eRnas eae ve 


8 


0 + 0 0 0b 0 0 0 0 0 0 0 0 0 0 8 ee 
tm] os | ote | oe | oe | oe | 

o-+ 0 
PO creat 


NQOOOOVWOOOVDVOOOOOV00O0000O 
0 0 be 


O0dXOO000000 


0 += 20 = 0 


TEST PROGRAM 


016710 


devis0 


024150 
000374 


024169 


171152 


ME 
MOV 
NC 
CHKFK4: TST TEMPe 
BNE 
CMP 





EOS 
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MOVB = Re, (RO)+ ;MOV RECV’D CHAR. TO ’VT’ BUFFER. 
TST TEMP] 
BNE CHKFK4 
SUPCASE-1,R1 | ;STARTING 'UPPER CASE’ PASS? 
CHKFK4 :NO 
DISPLAY 
S22 ;TEXT "INPUT UPPER CASE” 


SFKCHAR,AVECTR ;RE-SET *tA’ RESTART ADOR. 
TEMP 1 SET PRINT INHIBIT SW. 


EXTCHR 
#CONTRL-1,R1 ;STARTING CONTROL PASS? 
EXTCHR ;NO 


DISPLAY 
MES23 iI XT “INPUT CONROL CHAR. S” 
MOV SFKCHAR,AVECTR :RE-SET ‘tA’ RESTART ADDR. 
INC TENE is] DISPLAY INHIBIT SW. 
EXTCHR: chp CNT IT,R1 STARTING CONTROL Pass 
INC kst OR1 yes, SET UP TO DISPLAY INVISIBLE CHAR. 
BIS #2, JFKCSR sCLR NTERVAL TIMER FLAG 
CMP aCHREND*1, Rl FIN 
BEQ ies RE START TEST 
JSR PC, CLRFKV :CL INTERRUPT VECTOR 
POP2SP RESET STACK 
ENDTST 
CHRERR er feog SVTCSR se euE AUTO. P ON ERROR 
BL Saunt He. Pret er geet 
CHKFK2 
INC FIELDSW NOS SET ’FIELD’ SW. 
MOVB #374, (RO)+ jgeLeCT T ’BOLD-UNDERLINE’ 
CHKFK *SET FIELD CONTROL SOFTWAR 


HEHEHE HEHEHE HEHEHE CGE GEHER HEEB ER AEE ERAR BEEBE R EAR EEE ER EEE ER 
;FUNCTION KEYBOARD REPEATIBILITY TEST (20) 
; THIS real VERIFIES THAT A SELECTED CHARACTER OR CHARACTERS (MAXIMUM OF TWO) 


SELECTED The Proatan welts, LOAD The COOE FOR THE CHARACTER 10 BE VERIFIED 
INT A AND PRESB Kou se Tee Pho Pte AGAIN. 


OS Sear ee ew ia a ae 


Bh sho Mies ORE tf ived. cherdcTER IS DISPLAYED AS PeoLDe SUNDER 
SSOLeDEPEcaSEAOEASTSISNEDASEESSSEESEEDSRGTESSOESASSEEESTOROOTEOaEOTERSESEREE 


FKREPT: TST TTYSWH iho. AVAIL 
ero FKRPTA RAT Force CHAR. CODE 
1 T CHAR. CODES 
REEMBL ey CODES 
BR FKRPTB 
FKRPTA: HALT ;GET IST CHAR. FROM THE SWITCHES 
MOVB @SWR,R3 SAVE 1ST CHAR. 
HALT ;GET 2nB CHAR. FROM THE SWITCHES 
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gun, BY sSAVE '2ND’ CHAR. 
FKRPTB: Be 2200, Ra att tans 


NOV SLOT, RETURN 
PLAY 


SSss 3 
— 9 

wo 
O000 

= o-oo 


PS ptt yy 


4 ; TEXT °FK REPEATIBILITY TEST’ 
MOV Srunee | AVECTR 
CLR FIELDSW ;CLR FIELO CONTROL SOFTWARE SW. 
;CLR_WORKING 


CLR RS REG. 

JSR PC, TTYE ENABLE TTY INTERRUPTS 
JSR PC} LDFKV :LOAD "FK’ INTR. ADDR. . 
FREPTO 


WAIT sWAIT FOR ’FK’ INTR. 
;ENTERED HERE ON’ ’FK’ INTERRUPTS FOR THE REPEATIBILITY TEST 
FREPTO: FKCER sA5CI} FLAG SET? 

BPL XREPT NTERVAL TIMER FLAG 

DFKDATA, RI Wee READ & SAVE DATA 
Sonat 1ST OR OND CHAR.” 
*RECV’D = EXPT’D CHAR.” 
:YES 


BR REPTER :NO SET UP ERROR 
FREPTI: af sRetv? D = EXPT’D CHAR.? 


REPTOK 
000200 171216 REPTER: ISSUE AUDIO BEEP 
024150 FREPT sFIELD SW. SET? 


024150 NC. :NO, SET IT ' 
000374 ' :SEND BAD CHAR. AS ’BOLD-UNDERLINED’ 


024150 © REPTOK: : ;FIELD SW. SET 
BE FREPT 


024150 IN RIT 
000360 ‘a EELS corey CHAR. 


FREPTe: ; 
R ; TRANSMIT RECV’D CHAR. 
OC0002 171132 EXREPT: Ble KCSR CLR INTERVAL TIMER FLAG 


iat sate tanta Ge ie a ee 


an Ta 16° bieh mse Fae VT20_ IN A SYSTEM ENVIRONMENT. THE 
Mi Wet A AND ALL Aan bb i" S 


ae “COreUTE 5 We yo THiS reat TH DL 
COMPUT ROUTINE 


“ne So el a Gm  a 
Disa nf THE PRGR PROGR a eee ‘Pe 1 Nae ie got. ie 

RS, : 
ea erlan a a Tie fa Rene EI Batt 


OS E 
fs TT PRET PING THES THE Teas 10.05, TRA NONITTED 7 HOS et rut WELL 
;RE-T RANSMIT THE DATA BACK TO THE VT20. THE RECEIVED DATA IS THEN 


it 


: 


stats 
| as | 
e292299—90n000 2 


firoforurore 
et aati 


ius et 


& 
= 


8 
a 


“ 
3 


2 


Big 
ae 


a 


8 

— 

=) 
jo 
N 


BES Sa Rao 
ee 


Ba 
Omnmc 
; 


; 
Seraee 
ort 


Saas 


8 
fw 

Ba 
BS 


233 01 
1 
a3 1 
3037 Ql 
3038 Q1 
3033 Ql 
0 Bt 
1 Ol 
3042 1 
3043 Ol 
3044 O01 
04S Ol 
3046 Ol 
3047 ot 
3048 Oi 
3049 Ql 
3058 01 
3051 Ol 
30S2 91 
2053 Q1 
3054 01 
3055 Oi 
3056 
see 
3060 
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DBVTAC.PLi 


Beeusisdtad 2 


8 


Pate 


tg 
4 


ag 
ass 


specs 
ay 


3 
re 
oO 
ea 


[éN) 


S 


3 


eee 
Bg 


ebb 0+ bb bb 2b bb 8 bh Oh oh hs hh pe b= b+ hh 6-2 B= bh = bh he pe 


8 
6 


PPSSEReER 
Sve 


ERISSREROEIAS RORTROSSE TEE 
R 
8 


R 
SiSER PARSER EEA SARE 


~ 
at) 


ogs 


in 
yg Soy 7 Seg Sp Se Sy Dy Sy Se Se Se Se Sy 


io 
FOES 


GJ 
OrmMormnrma 


“I 


Center s 
uo 
££ 

o 


Penn 


-_ 
££ 
b+ f8 P= fh bb fh bs he he Hm 


& 


x 


PULL NOUN £ WOOD VO oH 
tT 


WWWWIWWIWOIWIW WWII WWI) WWI) GI WWII WII GIGI) 
hs eh 0 be 0 he ho Ob 0 Bs 2 eb ob bh 


att 
ett 


MACY11 27(732) I4-SEP-76 10:32 PAGE S6 
s VERTE TED AGAINST ML DATA ae es od TRANSMITTED. AND THEN DISPLAYED. 

; RECEIVE ees THE TRANSMITTED DATA, THE RECEIVED 

ith Dishes YER Fe aoe RLINED’., 

s THe Bes EM Be U Re ERROR” REPOR ING SCHEME OF DISPLAYING ALL 
RRORS AS THEY ARE ENCOUNTERED AS UNIQUE CURSOR pe ST ERS. THESE 

TERS IDENTIFY THE Pe ae ERROR DETECTED. TYPING 9 ’tC’ AT 


HARAC 
;ANYTIME WIL eNaLe I T TO 
;TYPING A PTT’ AF ER THE DA ‘gt | ls Treuryeo, WILL Ree 
A CONTINUOUS TRANSFER OF A SECOND TIME 
;WILL STOP THE DATA TRANSFER (ON COMPLETION oF CURRENT TRANSFER) 
;AND ALLOW THE TO RATION. 


HB HHEHE HHH HHH HHH HEHEHE HEHEHE GHEE HEHEHE EEE 
SYSTST: MOV #SYSTST, RETURN 
RESET 
MOV eSYSTST, AVECTR ; 
MOV #MES9, JVTOSAR : 
MOV #MES9;aVTISAR 
chp #4, UNITNO’ ;4 UNITS? 
MOV #MESS, @VT3SAR ;DISPLAY TEST HEADER ON UNIT °3” 


NC 
18: MOV #MESS. @VT2SAR ;DISPLAY TEST HEADER ON UNIT ‘2’ 
INC avTeCSR 





;SET- UP THE RESTART ADDR. 
;DISPLAY TEST HEADER ON UNIT ’0’ 
;DISPLAY TEST HEADER ON UNIT ’i’ 


2s: O83, — UNITNO. 33-UNITS? 


BEQ 
3S: NC SVTOCSR 
INC aVTICSR 
DELAYL 
DELAYL i 
EOSBUF -;RE-LOAD DATA BUFFER Wy ’E0S’ 
SYSIT1: MOV #340, aPSW :SET PROC. PRIO. a7 
NOV BRECSHO, RO :SET UP TO CLR SOFTWARE USER SW.°S 
ch #START,RO . sone? 
MOV #RECVO,QRINTO - - LOAD OL11 REC. VECTOR ADDR.’S 
MOV #200, JRLVLO ?BR LEVEL 
MOV aRECY RINT. 
MOV #200 arLVL ! 
MOV #TRANO, IXINTO sLOAD DL11 TRANS. VECTOR ADOR.’S 
MOV #200, JXLVLO 
MOV #TRAN1, JXINTI 
MOV #200, IXLVL1 : 
HOV aSERPKD aFKOINT ;LOAD 'FK’ VECTOR ADDRESSES 
MOV #SERFK1, JFKIINT 
MOV #200, JFKILVL 
MOV 8VTBUFF, RO ;LOAD *VT’ BUFFER POINTERS 
JSR PC’ DISPMS ;DISPLAY HEADER MESSAGE 
MOV #VTBUFF +1000. ,R2 
MOV RO, aVTOSAR sLOAD *VT’ STARTING ADDR. REG.’S 


MOV Re, JVTISAR 
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004737 ; PC, DISPMS 
012700 024567 eVIBUFF+5S. ,RO 


Bibbse Beuueo ty RO'BUFORT (RY BUFFER POINTER FOR UNIT 
ited mE ; sRO BUFFER POINTER FOR UNIT 


37 MOV. “Rl BUFFER POINTER FOR 
: TIME-OUT FOR MISSING DL’S 


;ENABLE DL11 REC. INTR’S 
;ENABLE DL11 TRANS, INTR.’S 


064 


GI) 
Lav) 


d= $-- b— 9 $s 


FUEHU-GLBVERLOW-owe & 


59996 — 
POSE 


qe 


[=] 
-_— 
3 


Oo00000 
be pee poe 


WWIWOIGGIGWWUIWLI IG) 
— 
88 


b— $2 6 b -2 BB 2 8 6 p - 9 


a 
Pes 


34 UNITS? 
;NO, TEST FOR 3 
#RECV3, JRINTS ; LOAD DL 11 REC VECTOR FOR UNIT "3" 


i] 
8 


pepesssseeqoossse = 
[=] oo 
BERANE NG ta ai 


$ VL BR 

aTRANS OXINTS {LOAD DL11,xMIT VECTOR FOR UNIT '3” 
9 

#SERFK3, JFK3INT ;LOAD FK VECTOR FOR UNIT °3° 

¢ ack aLVL ;BR LEVEL °4’ 

aVTBUFF +3000. , Re 

Re, VT3SAR 


PC’ DISPMS 
aVTBUFF +3055. .R2 
Re, BUF SRO ;BUFFER POINTER FOR UNIT 3” 


i 


£ 

| 
— 
To 


Sw 
S 


8 


p+ bb bh 8 fm Bs Be 


;LOAD ’VT’3 STARTING ADDR. REG 


8 
S 
ay 
poOK 
: Ht 
ae 


: 


; 


gan TaTa 
: 


sENABLE DL11 FOR UNIT '3’ TO INTERRUPT 
DLIIC: sSTART VT 
MOV ‘ENABLE FK INTERRUPT 
TAGIX: #RECV2, ORI :LOAD DL11 REC VECTOR FOR UNIT ‘2’ 
MOV DRLVL2 :BR LEVEL °4? 
“LOAD DL11 XMIT VECTOR FOR UNIT 2° 
$200, JXLVL2 *BR LEVEL °4? 
WSERFK2, OFK2INT = ~—Ss-s SLOAD FK VECTOR FOR UNIT ’2° 
:BR LEVEL °4° 


#200 oF VL ss a 
#VTBUFF +2000. ,R2 
Re, aVT2SAR sLOAD ‘VT’2 STARTING ADDR. REG 


PC: DISPMS } 
#VTBUFF +2055. ,R2 
R2, BUFERO ;BUFFER POINTER FOR UNIT ‘2’ 


1 
#00110, 384 , 
100, @RCSRe ;ENABLE DL11 FOR UNIT °2” TO INTERRUPT 


#100? 
#101; aVT2CSR 
101, dF KeC 

83, UNITNO 3 UNITS? 


TAGIX YES, SET UP UNIT 2 
RESET THE TIMEOUT VECTOR 


RSLS 
etetatatatatatat=t=tat=t=t=t=ta4 
mm rururu 
er 
eens 
tater at =: 


Po 
a 


= b= bs b= b= Bs 2 0 bh 


RRR 
WS 


m™u 

~~ 

<= 
ONddR20000 
mw 


;START VT ‘ 
;ENABLE FK INTERRUPTS 


uP 2B 
e 
2 


31 
31 
31 
31 
3 

1 
31 
31 
31 
31 
31 
31 
3! 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
31 
3i 
31 
31 
31 
31 
3l 
31 
31 
31 
31 
31 
31 
31 


2000 . COOOOOVOO OOOO OOOOOOOOOOOO0O0O0000000 
ee ee ee ee ee 


CSPO Od NOU 2 Odrr SDeD NOP UTE CHO Ded UO UTE CORO eae aD 


o 
eo 
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GIGI 
Re & 


;ENABLE ’FK’ INTERRUPTS 


;START VT’S 
} nov | 
;SET PROC. PRIO. 30 


SERVCE: ! #VTBUFF +08. ,RO 
MO CHRCTO, Re 


;UPDATE THE CHARACTER COUNTER 

#VTBUFF +22. ,RO . 

RECTRO,Re 
;UPDTAE THE RECV’D CHAR. COUNTER 

#VTBUFF +36. ,RO 

TRANFO, Re 


= 0 0 b= bb = bp —— 


;UPDATE THE TRANSFER COUNTER 


BBSRRPS SSSI RE 
SoeMetaeRe 


O0r--00-00+-00-00~ 
ay 


sVTBUFF +49. ,RO 
ERFLGO 


S 
: 
: 


;UPDATE THE ERROR COUNTER 


i 


OOO OOOO OOOO OOO OOOO NOHO VOHOO HO VOOOOOOKOKOHOOOKOOOO00000 oO 


ee ee ee ee ee ee 


Bhs 4 6b 2 he 2 OB bo bs = Bs bh bs Be ph pe BB 2 Bh ho po pe 


#VTBUFF +1008. ,RO 
CHRCT1,Re 


#VTBUFF +1022. 
RECTR1,R2 


Besos 
gecnasls 
sicneaaaas 


aS 


av TBUFF +1036. 
TRANF 1, 


Same om o9 
Sime 
w 


#VTBUFF +1049. 
ERFLG1,Re 


ao 


UNITNO, #3 ;RUNNING °3’ UNITS ? 
ov ;NO, RETURN TO SERVICE 
#VTBUFF +2008. , RO 

CHRCT2, Re 


S 


i 


;UPDATE THE CHARACTER COUNTER 


Oe 
WONWU£ WHO 


ge 
2 
3e 
3e 
3e 
3e 
3e 
3e 
32 


as 


#VTBUFF +2022. ,RO 
RECTRe, Re 


SVTBUFF +2036. , RO 
TRANF 2, R2 
pg PORTE THE TRANSFER COUNTER 


8 


;UPDTAE THE RECV’D CHAR. COUNTER 


S 
3 
3 


sa 
ee 


as 


#VTBUFF +2049. 

ERFLG2, Re 
:UPDATE THE ERROR COUNTER 

UNITNO, #4 ;RUNNING °4’ UNITS ? 

SERVCE . 3NO, RETURN TO SERVICE 

#VTBUFF+3008.,RO - 

CHRCT3, Re 


Sa 


a 


#VTBUFF +3022 
RECTR3, Re 
#VTBUFF +3036. 
TRANF 3, Re 


CELUSSRE RTO RENE Tae ORR ES 


Ne: 

eapenersee 

YEGUES 
RISER 


#VTBUFF +3049. 
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3240 MOV ERFLG3, Re 
asii BINDEC 
4 BR SERVCE 
;ENTERED HERE TO MOVE A MESSAGE INTO THE VT BUFFER 


DISPMS: MOV #MES80,R 
CaP (BI), (Ae) 
BNE propaens 
RTS pi 
;ENTERED HERE ON ’FK’ INTERRUPTS FROM UNIT '0’ 
SERFKO: 128 PC, SETBFO ;SET UP we POINTERS 


PC’ SERVFK *SERVICE °FK’ INTERRUPT 
SAVBFO : SAVE SoFFER POINTERS ON RETURN 


;ENTERED HERE ON *FK’ INTERRUPTS FROM UNIT '1’ 


SERFK1: JSR PC, SETBF1 ;SET UP BUFFER POINTER 
JSR PC’ SERVFK ‘SERVICE 'FK’ INTERR 
IMP SAVBF 1 :SAVE BUFFER POINTERS ON RETURN 


;ENTERED HERE ON ’FK’ INTERRUPTS FROM UNIT ’2” 


SERFKe: JSR PC, SETBF2 ;SET UP BUFFER POINTERS 
JSR PC SERVFK s SERVICE "EK? INTERRUPT 
IMP SAVBFe :SAVE BUFFER POINTERS 


;ENTERED HERE ON ’FK’ INTERRUPTS FROM UNIT ’3’ 


SERFK3: JSR PC, SETBF3 ;SET UP BUFFER POINTERS 
JSR PC’ SERVFK s SERVICE PEK? eaNTER RUPT 
IMP SAVBF3 VE BUFFER P 

sENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT ° 


TRANO: JSR PC, SETBFO :SET UP BUFFER POINTERS 
ISR PC’ TRNSMT 
IMP SAVBFO 
sENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT ‘1° 
TRANL: JSR PC, SETBF1 :SET UP BUFFER POINTERS 
SR PC’ TRNSMT 
SAVBF | 
sENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT °2° 
TRAN2: JSR . PC,SETBF2 ;SET UP BUFFER POINTERS 
ISR PC’ TRNSMT *SERVICE TRANSMITTER INTERRUPT 
SAYBF2 
sENTERED HERE ON DL11 TRANSMITTER INTERRUPTS FROM UNIT °3° 


ae TRANS: JSR PC, SETEF3 ;SET UP BUFFER POINTERS 
0847 JSR PC; TRNSMT 


ers 
Co’ .£O 


eee | BR 


= 
a 
3250 
Q 
= 
. 
a 
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IMP SAVBF3 
;ENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ’0° 


RECVO: JSR PC, SETBFO 
JSR PC, RECVIT 


sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ‘1’ 

RECV1: JSR PC, SETBF1 
ISR PC’ RECVIT 
SR SAVBF 1 

sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT ‘2’ 

RECVe: JSR PC, SETBF2 ;SET UP BUFFER POINTERS 
ISR PC RECVIT ;SERVICE RECEIVER INTERRUPT 
3k SAVBEFe 

sENTERED HERE ON DL11 RECEIVER INTERRUPTS FROM UNIT °3’ 

RECV3: JSR PC, SETBF3 :SET UP BUFFER POINTERS 
ISR PC’ RECVIT :SERVICE RECEIVER INTERRUPT 
BR SAVBF 3 

; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT ’0” 


SETBFO: MOV = (SP)+,KSTORL ;SAVE THE RETURN ADDRESS 
: MOV =—- RO, - (SP) _ SAVE THE WORKING REG.’S 


Eoaedenaane 


WONMU CUT 


LIEILIEILIEICSEIESEIED 
ehige 0 0 + 
220 


8 
Ssprengnszen = ah 


see 


Seee 


QOnd0o0RI000 
et ey ey et art at 


3 


Re 13 iNpEX OFFSET FOR ADDRESSSING 
3R NDEX OFFSET FOR DEVICE ADDRESSING 


;RETURN TO CALL 
;SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT °1’ 


SETBF1: MOV -  $SAVE THE RETURN ADDRESS 
MOV © ;SAVE THE WORKING REG.*S 


2 


OOOO OOOO0000 
ee 


R 
024430 -  #VTBUFF+SS. , START 
JMP @KSTOR1 


MRS RSIS ISL 


ee 


ONONOONO0O00000 
Ssreeaey 


024412 

He44s2 

:R2 IS INDEX OFFSET FOR ADDRESSSING 

0 14  #12:,R :R3 IS INDEX OFFSET FOR DEVICE ADDRESSING 
012312 TOR : RETURN TO CALL 


; SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT *2” 


0 0 
tururururorurorururuorury 
FOLSLISEHSK 
OOKOO0O0O00000 
ee ae a ee eg ae ag aay et ae ans 
—VE882oneeu: 


ING 


Hegeead 


Ww 
@& 
uw 
~ 
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TBF2: MOV = (SP)+, KSTOR sSAVE THE RETURN ADDRE 

SETEFe: OY ORB tae ‘SAVE THE WORKING Rea. 'e 
MOV = RI; =(SP) 

Re, -(SP) 

R3,-(5P) 

eee 

BUFORI;RI 


2 
a 


2SFEREHG 


b+ bb > bb = 6 = D- o pme 


frurururururure 


. 3R2 13 {weer OFFSET FOR ADDRESSING 
;R3 IS INDEX OFFSET FOR DEVICE ADDR. 


sRETURN TO CALL 
;SUBROUTINE ENTERED TO SET UP BUFFER POINTERS FOR UNIT °3” 


;SAVE THE RETURN ADDRESS 
;SAVE THE WORKING REG.’S 


ONOV0O0000000 
RRR RRES HY 
pe 


Se 


QOO0O0O0000000 


Ob s&h bh he 


#24. .R3 
024430 #VTBUFF +2055. , START 
aKSTORI 


fs 
o 
8 
3 


ONdNdDKOKOOO0O0000 
fy 
FESR 


pau 


#6 
#36. ,R3 

#VTBUFF+3055. , START 
aKSTORI RETURN TO CALL 
;SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT °0’ 


024410 SAVBFO: MOV 
024420 MOV 


032457 
012172 


8 


ron 
an 


;RESTORE THE WORKING REG.’S 


8 
eeenese 
aac 


Re 


33$2 
, 
es 
3365 
ES 
a 
a3 
a 
a 
ee 
Bs 
S 
= 
3388 


2 


ON0000000 
o 
3 


ee errr 
rururururu 
WOW) 

Here 

£vVvo 


a8 


;RESTORE THE WORKING REG.°S 


2099290 
BRED 


o 
8 


; SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT *2° 


024414 SAVBF2: MOV RO, BUFERO 
o24424 MOV RI: BUFORI 
MOV (SP)+,R4 ;RESTORE THE WORKING REG.’S 





VT20 ayeren DIAGNOSTIC TEST PROGRAM 
DBVTAC.P11 


Sane 
aaa 


VT 
10 
1 
ib BiB 
1 
3 Sule 
ie H 366 ate g 024416 
: ieave Rises Oe4426 
ie ties Glee 
20 OlewWe Oleb0e 
s4e1 O1e404 012601 
Stee O1e406 012600 
S423 012410 000002 
3424 
4eS 
2b 
3458 le41e 434 
Pe GIRIE Te oe 
3430 pisise 117620 000 
pag le4e6 ile7e0 00036 
32 Ol243e 112710 000031 
3433 0120436 062716 
3434 Ole4%42 000207 
3435 
3436 
S438 012444 105773 001334 
3439 Ole4S0 100421 
S440 ODiewSe 005762 024300 
3441 O1e4S6 00101 
3442 012460 005 024254 
3443 012464 001011 
S444 O1e4%66 005762 Oe4e44 
S445 Ole47e 001402 
3446 012474 004737 013760 
. 3447 012500 000137 013106 
3448 012504 000137 013304 
S443 012510 000137 013350 
3451 012514 005773 001334 
345e O1e5e0 100003 
aie acd rf 4 Ole4le 
hee 
S456 012534 122704 000003 
3457 012540 001051 
3458 QOleS4¥e 005762 Oe4400 
3459 O1e546 001403 
3469 Ht SO O05e6e 024330 
3461 Q1e554 000554 
S46e 012556 013700 24430 
3463 OleS62 112710 000031 


MACY11 27(732) 14-SEP-76 10:32 PAGE 62 


(SP)+,R3 
MOY «CSP Da RT 
MOV (2p)3° RO 
RTI 


; SUBROUTINE ENTERED TO SAVE BUFFER POINTERS FOR UNIT ’3’ 


SAVBF 3: tad RO, BUF 3RO 


MO R1,BUFSR1 - 
MOV (SP)+,R4 
MOV (SP)+,R3 
MOV (SP)+, Re 

MOV (SP)+,R1 
MOV (SP)+,RO 
RTI 


; SUBROUTINE ENTERED ON E 
; THE CHARACTER IN THE PC 


I 

FLGERR: INC ERFLGO(RE) 

MOVB § #BLINK, (RO)+ 

MOVB a(SP).(RO)+ 

MOVB 360, (RO)+ .- 

MOVB = #£0S. (RO) 

2, (SP) 
RTS P 


;FK INTERRUPT SERVICE ROUTINE 
SERVFK: TSTB a@FKOCSR(R3) 
BMI SERVOO 
TST AUTSWO(R2) 
BNE AUTOLL 
TST PATERN(R2) 
BNE 
TST HOLDSC (Re) 
BEQ 
SR PC, TESTSW 
MP 
JMP 


SERVOD 


LINKOD: J 
AUTOLL: AUTOUT 


IMPWOR: JMP WORST} 


SERVOO: TST SFKOCSR(R3) 
L SERVOA 
SR PC, FLGERR 
SERVOA: MOVB = aFKODAT(R3),R4Y 
CMPBssa#3, R4 
. BNE SERVAA 
TST BUSYO(Re2).-- 
BEQ A 
INC STOPO(R2) 
BR SERVOD 
RELOAD: MOV START. RO 


MOVE _ #£0S, (RO) 


;RESTORE THE WORKING REG.’S 


NCOUNTERING SYSTEM ERRORS WHICH MOVES 
NTO THE DISPLAY BUFFER. 


;SET ERROR FLAG 

:SET UP TO BLINK CHAR. 
MOVE CHAR. INTO BUFFER 
:CLR PRESET FIELD 

: TERMINATE W/ EOS. 

:SET UP STACK TO EXIT 


sASCII FLAG SET? 
YES, SERVICE KEYBOARD 

?IS THE AUTO CHAR. SW. SET? 
:YES, GENERATE @ CHARACTER 
‘GENERATING WORST CASE PATTERN? 
YES, OUTPUT NEXT CHAR. 
*INTERVAL TIMER, IS ERROR HOLD SET? 
*NO, CLR INTERVAL TIME FLAG 

YES, TST SWIS TO. CONTINUE 

*SW1S STILL -SET, EXIT 


sERROR FLAG SET? 
;NO VALID CHAR. 

“YES, ASCII ERRR FLAG SET 
sDISPLAY A *BLINKING Kk’ 
“READ & SAVE CHAR. 
;CHAR="tC’? . 

*NO, CONTINUE 

“YES, DL’S BUSY? 

°NO, RE-START 

:YE ' SET STOP SW. 


TEX 
:RESET BUFFER: POINTER 
SET UP FOR NEW INPUT 


aR te DIAGNOSTIC TEST PROGRAM MACY11 27(732) 14-SEP-76 10:32 PAGE 63 


o0s06e XFERO(R2) 
005062 RESTRO( 
A a'l 


cC 

~< 
Baas 
furururu~ fu ~ fu — 
2 — 


ete 
pane 


bb — 


Se 


Ox 
oO 
— 


4 
vo oo0000022 
B2BBA2RABP 


;CLR CHAR. CNTR. 


ee 


;EXIT 
sGHARE tT" ? 


NTINUE 
R ives, ried TRANSFER SW. 
BUSYO(R2) ; CURRENT LY TRANSFERRING DATA? 


SERVOD “YES, TGNO 

RESTRO(R2) ‘HAS A RESTART ADDR BEEN LOADED? 
+1 ;NO TERMINATE INPUT BUFFE 

RESTROCR2), JRO iYES, RESET BUFFER POINTER 

SERV 2S 6 START TRANSFER 

#EC?, (RO)+ TERMINATE MESSAGE 

SERVBB 


Seri 
NESSES oSeN 


88 


SS 
nw 


;CHAR. = TO’ 
:YES AUTOMATICALLY GENERATE CHAR.’S 
*CHAR. = TO 'tE’ 

YES RELOAD. % 


= TO’ 
YES “GENERATE WORST CASE PATTERN 
*DLI1 BUSY 

:YES, IGNOR RE CHA 

sREGUEST oRENSEER? 


3485 
Ne? 
3488 
3483 
3490 
3491 Ol2e7e6 
3492 
3493 
3434 
3495 
3496 
3497 
3438 
3500 


BR 
SERVBB: 
MOV 3 BavE hee’ Ps saa FOR AUTO RESTART 
024400 


024204 a aBRSUO TR T SORNSEE FTWARE 
rR 1 ‘st UP BUF SEER, POINTER 18" TRANSMIT DATA. 
-SET UP BUFFER POINTE: 


Bbis70 = ceRvec: cL Bal nig TRaysntT THE START CODE 


i XI 
000177 SERVOC: re Oe :CHAR. = *RUBOUT’? 
5 BNE SERVEC :NO, SAVE 
024234 CHRCTO(R2) * BUFFER EMPTY? 
SERVOD YES, IGNORE IT 
024234 C CHRCTO(R2) ;NO *DECEMENT COUNTER 
000031 #£0S,-(RO) BACK UP BUFFER POINTER 
BR SERVOD ai 











\722 SYSTE™ DIAGNOSTIC 
pevTat.Pi! 

352 1Ney eae” 
ST Ei3t*2 31 
es: 

sey ine 1137: 

ae 
S. RIR1SS BRED 

#53 Bi 2 sae! 

ped 

seaq S350 GETSRS 

cle 

= fi iss if : 

25 Ge Bee 

354i Qusley Oo 

ee: 

Seve Sthne BBTCSS 

ie 
‘ 1 “ 

#5 bile lieve 

zee; 813550 bpase 

ese Qiseae 1ee7el 

3225 A135 1011 

3684 13540 o9s062 

SES 013044 O0SDeS 

Sees S13520 GtSce 

ae Bt 3se0 neues 

3625 913262 111172 

360 O13566 900207 

3ec1 013270 SO0000 

355 

363 

3c4 

355 013272 012704 

eee Dlae7e O40NES 

38e7 013302 

Séc8 

3éc9 

5255 | 

3571 013304 posae2 

3E75 013310 G427e2 

3673 013316 035762 

3574 013324 001003 

3e75 5326 (052762 


TEST PROGRAM 


~~. ** 


001576 


177600 024300 
000140 024300 
000040 024300 


‘14-58-76 


maCYLL 27.732 

SERVOC: OME CHROTOURE) 824. 
HIS SERVO 
INC > EHRCT ORE 


mo ve, (RO) 
SERVOD: Hi 82, OF KOCSR (RD) 
SERVDX: OL ‘ 
=" R 
:DLI1 TRANSMITTER SERVICE ROUTINE 
TRNSMT: TST INTRNO( RE} 
BNE +10 
I . ENTRNOCRE 
T ‘ 
TS q (R2) 
Eee Been 
TRANOA Hoy ae R3PRT 
ae ecm 
¢ +SWO1, 
teanocs4 
DEC NULCTO(R2) 
RVBC 


RA 
MOVE 8377 SXBUFOCR2) 
CLR RECTRO(R2) 
RTS PC 

TRANOS: CMPB aE OP (RL) 
BNE TRA 


CLR TRNSWO(R2 ) 
CLR Catt 


INC —- RECSWO( Re) 
HOY START, RI 
TRANOC: HOVE — (RL), BXBUFOCRE) 


T 
R3PRT: .WORD O 


10:32 PRGE 64 


YES, IGNORE CHAR. 
: TNCREFENT CHAR. CNTR. 
sNO VE C 


INES, SERVECE. TT, 
IMTS IS THE INITIALIZE INTERRUPT. 
RANSFER SH. SET? 


;7! ; 
ive INTERRUST 
2NO. ILL TRANSMITTER INTERRUPT 
:DISPLAY A "BLINKING T°. 


;READ THE SWITCHES 


Hes, ett 


sXMITTED 4 NULL CHARS? 


;RECV’D CHARACTER COUNTER 
:HAS LAST CHAR. BEEN TRANSMITTED? 
:NO. TRANSMIT NEXT CHAR. 

: YE RANSHIT SH. 

:SET UP TO REC. DATA 
:RESE POINTER TO COMPARE DATA 
: TRANSMIT NEXT CHAR. 


;ENTERED HERE TO INITALIZE THE AUTOMATIC CHARACTER GENERATOR 


s ENTERED HERE TO GENERATE AND OUTPUT THE AUTOMATIC CHARACTERS 


AUTOST: MOV #41,R4 

MOV RY, AUTSWO(R2) 
_ SERVCC 

AUTOUT: INC AUTSWO(R2) 
BIC #177600, AUTSWO(R2) 
BIT #140, AUTSWO(R2) 
BNE + 
BIS #40, AUTSWO(R2) 


UPDATE THE CHARACTER 
:15 CHARACTER LEGAL” 
NO, RESET IT 





VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
DBVTAC.P12 


tes 


eAeRentats 
ch 


2a 


i 
a 


AAA AAR eH 


erent 
—OWOONOUE Wr 


st 


3623 


ia 


6 b= © ~ & + b= b-« & 2 2 po pH 


FREROI ESR MR SROATE 


iii 


is 


Ty 
nv 


aie 


CONOOVOOODVOOOVOOOO0VOOONND GOOOOVOOVVOVNOOVO0000000 
ot EROS 


0 0 = 0 b= 0 0 02 2 0 he 2 0 = ee 


atatatatatatasy| 


“N 
oO 


024300 


024430 


900014 


 OB4174 


000001 
Ole4le 


040000 
o1e4ie 


020900 
Ole4ie2 


Ole4ie 
€SS560 


i] 
177774 
000003 


C24224 
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MOV AUTSWO(R2) ,RY 
BR SERVCC 


EAT EEEN tae ENTTILIZE AND OUTPUT A WORST CASE CHARACTER 


Se’. 
WORST: MOV 252 PATERN(RE) 
WORSTL: COM PATERN(Re) :COMPLIMENT PATTERN 
MOVB  PATERN(R2),RY 
BR SERVCC 
sDL11 RECEIVER SERVICE ROUTINE 
RECVIT: MOV DRBUFO(R2) RY sREAD DATA BUFFER 
MOV START, RS 
ADD 8900. | RS :IS BUFFER LIMIT EXCEEDED? 
CMP RS_RO :1$ BUFFER LIMIT EXCEEDED? 
8GT RECVON :NO, PROCESS CHARACTER 
MOV JSWR, R3PXT : AND SW1 ARE SET - 
gI¢ #177774, RSPXT :D0 NOT EXIT- RESET THE SUFFER 
che #oW00+SHO1 ,REPXT :AND CONTINUE. 
MOV START, RO 
BR RECVON 
18: CMPB Ss EOP RY s TRANSFER COMPLETE? . 
BEQ RECVOD YES, SET UP TO EXIT 
RT PC ?NO. IGNORE THE CHARACTER 
RECVON: TS RECSWO(R2) “REC, SW. SET? 
BNE RECVOA ‘YES, LEGAL REC. INTERRUPT 
BNE = RECVOAT a ody Tienes pate 
STERR: aM PC FLGERR >NO *feecae REC. INTR. 
122 :DISPLAY A "BLINKING R’. 
RTS PC sEXIT 
RECVOA: TST RY sREC. ERROR BIT SET? 
BPL RECVOB *NO, VALID CHAR. 
BIT #40900, RH OVERRUN ERROR? 
JSR PC, FLGERR ?YES, DATA OVERRUN ERROR 
117 _ SDTSPLAY A “BLINKING 0° 
BR RECVOB 
BIT #20000, R4 sFRAMING ERROR? 
SR PC, FLGERR tYES, DISPLAY A ‘BLINKING F° 
BR —° RECVOS : 
JSR PC, FLGERR ;PARITY ERROR 
120 sDISPLAY A GL NKING °P’ 
RECVOB: MOV JSWR, R3PXT *READ THE SWITCHES 
BIC #177774, RAPXT . 
CMP #SWOO+SWO1,RSPXT sLOOP DATA BACK REQUESTED 
BEQ RECVAC : 
rSTB := NULL CHAR.? 
BEG YES 


RECVOE IGNORE IT 
TST STCODO(R2) SHAVE WE RECEIVED THE START CODE? 












VT20 SYSTEM OIAGNOSTIC 
DeVTAC.P 






VTAC. Pll 
3832 013574 OO1014 
oe Ree Ol 
13608 T1212 000136 
Se O10 ilecey poobls 
3838 Ol36e0 O0Sebe Det2e4 
233 013624 000474 
4] 013626 ie2704 9oO00014 
364e Ol o014es 
364 bises 908262 024320 
3644 pi sug le04e 
3645 Bist 00141 
SS48 O13644 O0S76e Oe42b6 
3647 O13650 001002 
2848 O136Se O0S2e6e 924340 
38493 Bi 3638 O0Sebe Oe4eb6 
3650 O1366e lle7e0 5003 
S651 O13666 110420 
3652 013870 112720 900369 
2653 013874 Oo00401 . 
3654 013676 He 2aT, 
3éSS 013700 112710 000031 
3656 013704 000207 y 
Se; Oli Geek. gevai9 
Spee piaele ppebes 0241 
3680 013722 O0SObe Det#ec4 
3661 013726 O00S576e 0624370 
3662 013732 001431 
3663 013734 024330 
0i3740 0014 
013742 000137 O1 
013746 Ol 024360 
0137S2e O05 024340 
es: 00i4le 165340 
pts? B0 ] ll 
013768 O05762 024244 
013772 901404 
013774 024340 
014090 9050 024244 
014004% 000137 012770 
014010 Ole76e O00001 
014016 000207 
014020 0000 








000001 








024320 


TEST PROGRAM - 


024244 


165274 


RECVBB: 


RECVBC: 


1$: 


RECVOC: 


RECVOD: 


TESTSW: 


eco: 


RECVOE: 


RECVAB: 


MACYL1 271732) 
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RECVBB 
: 77, R4 


#EOP, RY 
RECVOD 
RECTRO(R2) 
RY (RL) 
BLKERR(R2) 
ERFLGO(R2) 
BLKERR(Re) 
a7 (RO)+ 
4. (RO)+ 
a0, (RO)+ 


Pi (RO)+ 
605, (RO) 


TRANFO(R2) 


) 
XPEROCRE) 
REC 
— 


RELOAD 
RESTRO(R2) ,RO 


ERFLGO(Re)’ 
RECVOD 


CVEE 
HOLDSO(R2) 
RECVOD 
ERFLGO(R2) 
an Re) 


SE 
#1, HOLDSO(R2) 
PC 


#SWOO0, ISWR 
R cvoe 
Evee 






;YES, SAVE DATA 
sNO," 1S THIS. 11? 


iN, CHE Wo’ 
é BESPLAY ST. CODE AS ‘ft’ 
Eh BUFFER. 


eeree DONE? 
SET UP 


TO EXIT 
i KEEB TRACK OF NO. OF RECV’D CHAR.S’S 


CORP RE REC. DATA TO TRANS. DATA 

HAS A BLOCK ERROR BEEN DETECTED? 
DON’T UPDATE ERROR COUNTER 

IDATA ERROR SET SOFT SWITCH 

sDISPLAY CHAR IN “BOLD-UNDERLINE” 

:CLR FIELD PRESET 

sDISPLAY REC. CHAR. 


sEXIT 
; TRANSFER COUNTER 


;CLR. one’ a SW. 
;CLR_S CODES 
315 auto NSFER a. SET? 


IN R EXIT 
YES, STOP sue Ser? 
:NO ‘START aiteXT RANSFER 


a: ES, RE 

ERROR ‘gesET T SUFFER POINTER 
BART Geet snares 

ie HRufat? Pur OTHER TRANSFERS 
S’swis BEEN SET AND NOW RESET? 
IT HASN’T BEEN SET 

on RESET THE ERROR COUNTER TO ‘O° 


;SET UP NEXT TRANSFER 
SET TO HOLD XFER 


a O° SET? 
es, yet DISPLAY CHARACTER. 
3NO, POST AS ILLEGAL CHAR. 


;ENTERED HERE IF BOTH *SWOO 8 SWO1’ ARE SET 
INC. 


RECVAC: 


RECTRO(R2) 


;UPDATE RECEIVE COUNT 





Law) as | oe | y= 
= — 
my 6S 
S800 3% 


iiatatate 


wn 
ONEEE 


8 bb be bee 
be he be bah yt 
Sows aos a 
Smeets 
NOOO NO 


VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
DBVTAC.P1l 


te 
001570 
177400 


00376 
000006 
024474 
015166 
000060 


000031 
000370 


o00040 
090031 


024160 


o24464 


165112 
024464 


MACYL1 27(732) 
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TRANF (fs 


TRNSWO( 


RY SXBUFO(R2) 
#177400, R4 


#3, KSTORS 
#376, MASK 
6,R3 


VE1 
#40, (RO)+ 
#05, (RO) 


vavesveateavesesneoveateneeveneeseaseseinensesseceeneapeseaeernateatasiets 

HRU A vat Rosie SUBTEST. ENT Tait FROM THE ’MONITOR* 

, NTERING THIS SUBROUTINE ANOTHER ’HALT’ IS EN- 
LORD THE a OF THE SUBTEST TO BE EXECUTED IN THE DATA . 

:SWITCHES AND PRESS CON 

:NOTE THAT "SW11’ MUST Be *O? (DOWN) TO RUN THIS TEST. 

Pee treULtiiiite Oliiiies i COGtiiiiiteertiri iri recoerere ii rocor gs: 


;TTY AVAILABLE? . 
INO, HALT FOR TEST ADDR. 


3 TEXT *TEST ADDR.? ’ 
; YES ort BOOR. FROM TTY. 


TTYSWH 
TSTA 


R3, KSTOR1 
TStB 


OSWR,KSTORI 
KS TRA, , SSETUPF 
PC SETUPV 


@ PAGE 67 


VE ADDRESS 


FOR ’ 
ise} UP FOR ‘VT’ 


;ADD_ ’2’ TO POINT TO INSTRUCTION AFTER SCOPE 
;LOAD TEST NO. 


;KEEP COUNT AT ZERO 
s40AD OAD B #6 res ,00F RETURN POINTER 


ssecesoubonueensesssssanssunsusebassnensersrissveesacececuceceaseasecses 
;SUBROUTINE TO ISSUE N SPACES 












HEP The Trevor TTeR SuITCH 


is a NSP O° DIS ay oe TAL REPRESENTATION 
THE CHARACTER 







;PUT CHARACTER IN DISPLAY SUFFER 
; TERMINATE BUFFER 


ye 
*YES, PLACE 'SPACE’ CODE IN BUFFER 



















og og ysele TEST? 
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OBVTAC.Pil 


TEST PROGRAM 


165016 


0 
14326 


014326 


164654 


ogo003 


O0eS26 
000001 


007432 


165010 
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sSPACEX Ts CLEARED FHI TRE. SUBROUTINE y 80, THAT 8 CALL ON 
:SPACE WITHOUT LOADING PAC 


SPACE WITHOUT LOPOING SPRCEX ISSUES ONLY ONE, SPACE a ssnueeneseeners 


XSPACE: gre aTPS ;WAIT FOR TTY READY 


<4 
$240, JTPB ;OUTPLT_A SPACE 
SPACEX 


XSPACE fe ae 
SPACEX jeer ca COUNT PONE 
X: 


SUSE HUB HE EHEC OHHH HOH HEC HEHE HUE EHO H EEUU EEUU Ett 


;SUBROUTINE TO TEST FOR THE KEYBOARD FLAG BEING SET 
FP irertirtrirrtisitititiiiriiiiitttitiititiitiriiiiititiiiiiiitereriitiirerey 


TKSFLG: TST TTYSWH sUSING THE 'TTy’ ? 
Q ,t18 : NO 
Bark sFLAG 
BPL +4 NO, EXIT. 
TTYIN yes, INQUIRE 


5 Je HEHEGEHIHEHEEHEHHEHEIHHHHHHHHHHHEHEHHHHHHHHHHHHHHHHEEE 
?KEYBOARD SERVICE ROUTINE 
STETEEETSTESETSSTEPESTETTCT OTT TT STOTT TTT TTT TTT TTT TT TTT TTT TTT TT TTT TTT Ty 
XTTYIN: MOV INBUF , R4 ;SETUP CHARACTER BUFFER 

CLR C -CLEAR CHARACTER COUNTER 


¢ INBUF 2 
INPUTA: TK ; CHARACTER READY? 
BPL :NO, WAIT IT OUT 
*SAVE CHARAC TER 
:STRIPE PARITY BIT 
‘IS ITA SPECIAL CHARACTER 
YES, TEST IT 


8M . SPCHR1 
INPUTB: ;SAVE_ CHARACTER 
INCREMENT ‘THE CHARACTER COUNT. 


j BMI SPC ;TYPE °?° IF TOO MANT CHAR. 
OUTPTA: BB ie: ECHO CHARACTER 
‘ee 
. sWAIT FOR NEXT CHARACTER 


i SUBROUTINE TO TEST FOR SPECIAL CHARACTERS :'tC’,’+","CR*,*,’ OR "RUBOUT” 
SPCHRI: CMPB -#3,, RI ;CHAR, =" tC’ 


IN tC’ 
ee ext 19 MONITOR 


:N 
YES, RE RESTORE STACK 


TRLA ues +A’ 
IMPs MAVECTR 









ena natn 
WOnNWUI£CWIlRH-O 


i 


comes | 


OQOOOOOO0O0000”m 


OOOOO OOOO VDOOKO0OOONN00090000 


a 


inanen 


be 
rco 


é 


& 


ro 
ae 


Ps 
tT 


Fatatatea 
roo 


FE 


S555 eRRE 
Sets eolenles 


en toe 
£ECLCL EL Sk 


SxeTnes 
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000177 
024152 


024152 
000134 


000054 


000015 


000040 


OceS26 


000260 
024140 


o24244 
010000 


014750 
014759 


164364 





MACY11 


SPCHR3: 
SPCHR4: 


XTTY: 


PCHRS: 


INBUF : 


See aetna ei pt ate el 
STHIS ROUT SETS UP 
: THE OPPSI 


TSWAP : 


SWPEXT: 


CLR 
T 
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27(732) 
CMPB sé 177,R1 
BNE SPCHR3 
TST CHRCNT 
BEQ INPUTA 
DEC CHRCNT 
MOV #134,R1 
TST -(R4) 
BR TPTA 
CMPBts«#S4, RI 
oe, ee 
BNE CARS 
PRINT 
CRLF 
RT 
CMPB sé 40, R11 
BEQ OUTPTA 
TSTB l 
BNE +6 
JMP .  MONITR 

‘PRINT 

RK 

BR XTTYIN 

=. +30 


#260 


UNITFG, MRUNNI 


HOLOSO 


+l 
#SWl2, ISWR 
+6 


PC 


NE GCs "SWAP SW.’ 
UNIT TO ar TESTED. 
Mt tiiiitilirerrerttirtrecceleerecer tree reeeeereceeeterertceteds 


; TEXT “RUNNING UNIT °X’ 


;RE-RUN TEST W/ UNIT ’X’ 
; TEXT "RUNNING UNIT ’0° 





“*RUBOUT? 
tTCNORE. CHAR. & EXIT 
;1$ RUBOUT L al 
:NO, IGNORE 


sTYPE '\’ TO INDICATE RUBOLUT 
;POP OFF LAST CHARACTER 
T FOR NEXT CHARACTER 
TEST FOR 
‘LEGAL CHAR’, SAVE IT 
3210 "CARRIAGE RETURN’ TO TERMINATE? 


NTINUE 
YES, TYPE 'CR-LF’ 






SALT on FOR SPACE 
sECHO BUT DON’T SAVE 
NB E ree A_NULL CHAR. 


HILLeGa CHAR. RETURN TO MONITR 
HERWISE ‘TYPE ° 






;WAIT FOR NEW ENTRY 
; CHARACTER STORAGE BUFFER 












AND -IF FOUND SET, 






:SWAP SW. SET? 
:YES, SWITCH UNITS 
NO, EXIT 

CLR GO BIT 

j SELECT OePosiTe UNIT 
:SET T UP 


*BACK TO °0’ 
:YES, CONTINUE TO NEXT TEST 
:CLEAN UP STACK: . 





VT20 agin DIAGNOSTIC TEST PROGRAM 
DEVTAC.P1l 


000 01S Ole 


100 


014750 
3857 014753 


004737 017062 


Saisterstst=t-t RNR 
<8r So8ne5 25 
sluee ett 


164264 


ba 
8 


164250 


eae 


0 
0 
0 
i] 
0 
i) 
0 
Q 
0 
0 
0 
C 
0 


5 


é 
g 
3 


QOoo0oO 
aaane 
af 
orn 
-_ 
oe 
oe 


33 


024472 
015166 


ae 
UTUNUTUNUTUn UT Un Un UT Un un 
Buy 
ara 
ot 
be 


164160 
164154 


000370 015166 
024472 


OOOOOOCOOO00000 
eh er ee 
SSA Aaya HS He ees 
ES LFHONRMOT LOD 


OCTPRT: i 
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MRUNNI: .BYTE 0,15,12,100 


j ERR SERA ES TERCERA EES ON DSR TESCO SO EEEOS TEST Tne Har anepeeeunnenecanennes 
add DISPATCH HANDLER. 
” AND USES THIS AS 


 cegunebebasenauossspesenanrsuacosannnensoeonmnoqsouensssassoneeesensest 


TYPMES: JSR PC, TTYENB sENABLE TTY INTERRUPTS 
SAVREG ; SAVE REGISTERS ON STACK 
MOV a(SP),Re T THE MESSAGE ADDRESS FROM START 
ADD #2, (SP) SET UP STACK TO EXIT 
TSTB TPS 
BPL 
CMPB 
BNE 


TYPERA sHANT FOR TTY DONE 
GETREG 
NULL 


#100, (R2) 
TYPER 

RTI 

CMPB 


TYPER1: 
BEQ 
TYPER2: ve 


TYPECL: MOV 
TSTB - 
BPL 
MOV 
TSTB ; INCREMENT BUFFER 


TYPERA 
5 HEHEHE HEHEHE RHEE HER ERE EEE ERR EERE ERE EE EERE REARS EERE EEE EERE 
$SEROUTING "9 yee g A ’6’ piglt OCTAL NO. THE ’PC’ CONTAINS 


AE REEESEREASSABERSSARESOSEREEEESEAEAEREAEAHEAEEABEAEEEEE ERE EEE EAE 


PC, TTYENB ;ENABLE TTY INTERRUPTS 
AVREG ; SAVE REGISTERS ON STACK 

a(SP),R1 DRESS OF WORD TO BE TYPED 
a UP STACK TO EXIT ° 


;MASK FOR FIRST BIT 


TYPERA: 


#45, (R2) 


YPECL 
{Res aTPB 


t OUTPUT 
iecar 


; TYPE CR’ 


;PRINT CHA 
;MASK FOR NEXT *S’ DIGITS 


;RESTORE REGISTERS FROM STACK. 
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“Re ‘sie cent _ = E.R 
ah ES HEMET PAR OD GERETRdE uf FYRRERPOastoLP AAP he POE 


| SLUMPS PREY al ih) HOY 
ee Elita ie gts ad eT ELF tl Pe 
332 : 


TQ ’ 


$35) ESSERE ELERELE SAE SERA RE RFE SEAS REE LSK LEELA LEER ESL ALLSA ER ELEEE KFA RELL ESSE 
353 15170 905737 024156 INTCHR: TST INTSWH s INITIALIZE SUBROUTINE? 
15174 001014 BNE LDCHAR L 
3925 15178 b12700 924500 MOV SVTBUFF , RO cet UP BUFFER ADDR. 
3926 015202 012701 o00040 MOV #40, R1 : CHAR. ,CODES START W/4O (SPACE). 
3927 015206 012702 177701 MOV 8-63. ,R2 LOAD ’ HAR. ’S/LINE 
3928 015212 012703 177760 MOV #-16./R3 sLOAD °16’ LINES a CHAR. ’S 
3929 bibe1 12704 015520 MOV sTERNTB, RY LINE TERMINATOR TABLE (EOL,EOP) 
3930 015222 005237 024156 INC INTSWH 
$331 1bee6 bpse0e LDCHAR: INC R2 s INCREMENT CHAR. CNTR. 
1 1 BNE LOCHR1 ?NOT END OF LINE 
3933 01523¢ 12708 177701 LDCHRO: MOV #-63. ,Re sRESET CHAR. CNTR. 
3934 015236 112420 MOVE (R4)4, (RO)+ LOAD LINE TERMINATOR (EOL,E0P,E0S 
_ 3995 b1se6 062716 oo0002 ADD #2, (SP) 
3936 015044 005203 INC RS s INCREMENT LINE NO. CNTR. 
3937 O15e46 00140 BEG +4 
3938 Ol RTS PC ” OL-RETURN TO *CALL+4’ 
3939 015252 062716 oo0002 ADD #2, (SP) iN, RETURN TO ’CALL+6° 
3940 015255 000207: RTS PC 
3941 O1 737 O0lbe2 LDCHR1: TST FCSET1 
3942 015264 001405 BEQ 414 
3943 015266 112720 MOVB #40. (RO)+ 
sai bide 605037 001622 CLR St 
1 1 BR 1§ 
Sauy Steams aoeear ! wi. i sMOVENCRERENT CHAR, VALUE 
948 pt esha esap 000335 {Bines: CMP #335,R1 s CHAR. “VALUE OVERFLO? 
$ac3 ptesis ean 000040 MOV HOC RESET CHAR. VALUE 
See pteste Me fOceRG iS. LINE COUNTER 
3952 015320 005037 o01622 CLR FCSETI : 
3953 015324 005737 001620 TST FCSET ORIEGN CHARACTER SE 
3954 015330 001043 BNE 2 ieee -IGNOR THIS SECTION 
3955 015332 127 000177 CMP R1, #177 “COUNT ABOVE 177? 
3956 015336 BLE 2s NO, IGNOR THIS SECTION 
3957 015340 120127 000203 CNPB saR1, #203 IF "NO FORIEGN CHARACTER SET 
piss 001435 BEQ 2$ *THEN THERE ARE SOME CODES 
sae 1 i20127 000207 CMPB sR, #207 :THAT WE DON’T WANT TO PRINT 
$360 O1535¢ O0143e BE 2 THIS IS THE INTELLIGENTS SECTION 
1 015354 leOie 000211 C R1, #211 
3962 015360 001497 BEQ § 
3963 015362 120127 oodel6 CMPB sé, #216 
3964 015366 001494 BEQ 
3965 015370 201 000210 NPB Ri, #210 
66 015374 001421 EQ 2 
397 915376 120127 000237 CMPB =soR1, #237 
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Ac.P 
3968 O1S402 001416 23 
3969 gIEYO 120127 900213 CMPB sR, #213 
3970 O15410 001413 BEQ 
“ 15412 ler 000215 an Byrnes 
i 4 ie) 000217 FB E , #217 
74 Ol 14 8EQ 2g 
3975 1s¥e6 120127 000255 CNP R1, #255 
3353 Sledsg BREI95 oore20 SET! 
a8 ples nit 000212 2s: CMPB oft AVISEOL isthe, Sap eE END OF LINE? 
3380 1546 ie bie? 000214 cree POH op | My SIBLE END OF PARAGRAPH? 
$38 OIiss Le? 000231 ae tp Nfseos oN VISIBLE END OF SCREEN? 
1 1401 BEQ <" Kor 
3984 015462 RTS PC 
3985 015464 - 005201 LDCHR2: INC Ri sYES, SKIP IT 
3986 O1S466 005037 001622 ~ CLR FCSETI 
3987 015472 000137 015304 IMP LOCHEB sRETURN TO ’CALL+2’ 
. 3354 ) HEHE EHH HEHE HEEB E HEHEHE EEE HEE EGER TEEG EEE EEE 
OUTINE TO SET UP A WAIT LOOP TO WAIT FOR VERTICAL SYNC (17 MSEC.). 
3931 | EHEC EEE BEEBE EEE BE SEB SEE 
$335 015476 004737 017062 XWAITS: JSR PC, TTYENB sENABLE TTY INTERRUPTS 
3994 O15S02 012737 170000 o24446 MOY #109 00, TEMP2 
3995 015510 37 024446 INC 
39% 015514 001375 ‘BNE 
$327 015516 RTI 
3999 sFOLLOWING IS A ’16’ BYTE BUFFER USED TO TERMINATE EACH LINE OF THE ‘VT’ BUFFER. 
400 t 15520 212 TERMTB: .BYT. 
4002 pt eest 214 BvTE VISEOP 
woos 015522 212 “BYTE 
4004 015523 214 "BYTE VieE 
4005 015524 212 "BYTE VISEOL 
15525 214 "BYTE VISE 
4 15526 ele "BYTE VISEOL 
4008 015557 214 “BYTE VISE 
4008 015530 ele “BYTE VISEOL 
4010 015531 214 “BYTE VISEOP 
4011 015532 ele "BYTE VISEOL 
Wig 015533 214 "BYTE VISEOP 
4913 015534 ele "BYTE VISEOL 
4014 915535 214 "BYTE VISEOP 
401s 015536 ele "BYTE VISEOL 
4016 015537 231 "BYTE VISEOS 
ate “am 
401 SO UGROITINE TO SET UP ail APPROXIMATE. a" GECONG DET ay Ta ROITING went 
4 SUBROUTINE TO SET UP AN APPROX MAT — °3’ SECOND DELAY. THE ROUTINE ALSO 
4021 ‘CONTINUOUSLY MONITORS DATA ’SW14’ AND IF FOUND SET CAUSES AN INDEFINITE DELAY. 
4022  sebseesenduecsenessrenseneurscaaunesesnususrruntenstabszuncteentersdie 
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—m 


175000 S24446 XDELAY: av ofS, TEMPe ;SET UP SHORT DELAY 


Of 7088 ot TPE ag tERDBLE FSV INTERRUPTS 
1 024444 
024432 


MOV “ag TEMP 
XDLAY1: TST DISPSW iD SPLAYING MESSAGE? 
SNE XDLAY 


: 


AY3 YES _ INHIBIT HOLD 
040000 163522 #SW14, JSWR rT ST at ite 
.-6 il SET, WAIT FOR CLEAR. 
004000 163512 11’ SET? 


31 
:YES, INIBIT DELAY 
O24446 XDLAY3: 


024444 INC 


XDLAYe: 
MILIFUSEAEAAAASSSEEAAEOEEAAEAREREAEERERERSEREEREEEERESEEEEEEEEEEEEREEE 


;SUBROUTINE TO LOAD ’64’ CHAR.’S INTO 'VT’ BUFFER. 
FT rrtitttt titi iititiitriitittitiitittiittiittititttititittttittttit ttt y 


XLDLNE: SAVREG ;SAVE REG.’S 
MOV #-64. RI *LOAD eH CHAR. BYTES 
MOV KSTORI , Re ;EROM THIS 
XLDLNA: MOVB (Re) +; (RO)+ :*RO’ IS POINTER TO A ’VT’ BUFFER ADDR. 
R1 if SHED? 
XLDLNA LOAD NEXT CHAR. 


GETREG YES, RESTORE REG.’S 
RTI 


5 EEE EEE 
TINE TO LOAD THE ’VT’ BUFFER W/ ‘VISISLE EOS’ CHARACTER. 
1 HEHE HEHEHE HEHEHE HEHEHE HOHE HOHE HEHEHE EOE EEE: 


ONO OOO OOO0O000000 “ous 
2 0 0 0 0 ee 

Ss 

~~ 

oN 


BREE eRe etasS 


, 


bbs seeR 


;SAVE REG. 
#VTBUFF , RO :SET UP BUFFER ADDR. POINTER 
#2300. *LOAD °S1S* DATA WORDS 
HE0S, (RO)+ 


oe 
o 


ones 


76 

#VTBUFF , 80 ;RE-SET POINTER 

aVTCAR ;CLR CURSOR ADDR. REG. 

RO, IVTSAR LOAD io ADDR. 
163566 #1, aVTCSR er DISPL 


a3 


he 
quay 
oo 
TOLO 


OOOO O0O000000 


“J 
® 


5 RHR ERA EERE RHEE KER REALE EERE EEE RELA EE ERE EERE EERE EEE R EERE RE EERE EERE 
; SUBROUTINE RN al THE END OF EVERY DISPLAY TEST TO CHECK STATUS 


;0F THE DATA 
SHBG GH 


024166. XTHEND: INC DONESW 


XENDTS DELAYL s ISSUE DELA 
017068 SR PC, TTYENB ENABLE Try Y tyTERRUPTs 
024154 ST RUNSWH : RUNING 

BNE RUNEM :YES, bo” rai 





Ss 
+s} 


Bu 
Tel 
=m 


3 


> > = d= = b= b= 9 — b> —- - p pe 


5 


SGn6sssanss 


tu 


<= 
~ 


Paes 


ONOOWOOOVOOOOOVOODOVOVOOOOOO00000 
ee eh eh 


COOrowrnd 


: 


5&4 
g 
55 
or 
a 
a 


£ 
RIBRLBSa 
CODd000000 
ee 


SRRRSS SUR UNS 


atatay 
SRIRES 205 


SSS8ereeeeeee 


—s 


Ba uie Bee Me Ree Sa 7a 


ee ee ee ee ee ee eee 


Scho 
BR 
q 


me ee eee 
MPOOKKMOKWon 
Ob 0 
Dom fnuewow 
fm | om | me | oe | oe | oe | oe) oe | oe] 


0 
0 
0 
0 
0 
0 
0 
0 








M DIAGNOSTIC TEST PROGRAM 


Sree 
are 
5770 
ahs 
6000 
E00 


010000 163350 
4388 024244 
o24244 


Pe: 


O24444 
016050 
000340 
024444 
000024 


002260 


XSAVRG: MOV 
MOV 






MACY11 27(732) 14-SEP-76 10:32 PAGE 74 





BiT #SH12, SHR s MANUAL ADVANCE SW. SET? 
. , 
Hee BRMpetlApoLoso EEL Ble sune su. 
TST HOLDSO s HAS Su. SET TO LOOP TEST? 
co iNORAAL ex} 
RUNEXT: AbD We (SP) bABUANCE TO NEXT TEST 


 REAAAAAALEA RAL LALA AA LAE LAE ELELA LA LF RALEREERALALLALL LA ELLE LEZ LALLA ELA RAE RAELEE 


;POWER FAIL HANDLE 
HEHEHE HEH HE HER REE RHEE EER REE RRR EERE E RARER RE EEEES LALLA AE REAR EEE ELE 


PWRFAL: MOV RO,-(SP) ;SAVE REGISTERS ON STACK 
NOY Re’ =(8P) 
MOV BS’ = (ep) 
RY, -(SP) 
RS,-<SP) 
MOV 24,-(SP) 
MOV SP, TEMP ;SAVE STACK POINTER 
+ #PWRUP, J824 sFOMER UP ROUTINE TO LOCATION 24 
PWRUP: MOV #340, OPSW ;LOCK OUT INTERRUPTS 
MOV TEMP! , SP ;POWER DOWN ROUTINE TO LOCATION 24 
MOV (SP)+, 824 
MOV (SP)+,RS ;RESTORE REGISTERS 
MOV (SP)+,R4 
MOV (SP)+,R3 
MOV (SP)+,Re 
MOV (SP)+,R1 
MOV (SP)+,RO 
RESET 
CLR Ri ;POWER UP DELAY 
INC Ri 
BNE 2 
DISPLAY 
MES21 
JMP ORE TURN 


5 HEHEHE HEHEHE HEHE HERRERA EEE EE EERE EERE R ERA AERA RARE EEE E ALAA ER EE EES 
;SUBROUTINE TO SAVE *R1-RS’ ON STACK 
5 HERRERA REE EEE EERE RRA A EEE K ARERR EEE REALE REE RERERERE 
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024462 MOV SAV2SW, -( SP) 
024460 MOV SAVEPC, -(5P) 


eaves | nV SAVER” (8) 


SS GROUTINE TO RESTORE "RI RG’ PROM THE CTA nnnnaEanSaTS 


;SUBROLTINE TO RESTORE ’ 
FT Ttriitititiitiittrtiititiititiiititittrtittiitiiiititititii titi t eet i ieiieeeryy 


XGETRG: MOV 
MOV 


ee 


Sgeatie 
SRG? 


Ppp Sp ee Se Sy ee 5 
Foforororororofurororos 

Hy oe nt ee 
DODO0KODB000000 


b= bb bh bh Pm po pe 
mu 
o 


Baee 


SAVEPC, -(SP) 


Pbat-t-btat hte tah del Sah lad bbb tel teh aled hah fda a tatatat ah tabeh baba tah bbb tahaha tah tat aha lalla 
SUBROUTINE TO PRE-LOAD THE ‘VT’ DATA BUFFER WITH DATA FROM THE ’PC’. 
Tritt titi tit itiiiitiiittii ttt iitti ii ttt titi tiie tiie 


XPRELD: CLR aVTCSR ;STOP *VT’ 
MOV ‘ ;SET UP ’S12’ WORDS 
GET ADOR. OF ot FROM STACK 
:SET UP STACK TO EX 
;SET_UP rt R DDR. POINTER 
fs DATA TO BUFFER. 


BNE | *NO, MOVE NEXT WORD 
014431 #14431, (RO) *YES. TERMINATE BUFFER W/ *EOS’ 
024s00 #VTBUFF RO *RE-SET BUFFER ADDR. POINTER 
163170 RO, VTSAR 00 *STARTING ADDR. REG. 


i 


eRe 


Roawe 


ae 
Shoe 


01 
O01 
Ol 
O01 
ot 

1 
O01 
01 
O01 
01 
O01 
01 


j RERK AREER EEL ER LEAR LALA R LAR R A EL ERLE L ALLEL REE AL REE EAE A ELA RLEL ER ERA REE 


;SUBROUTINE TO SET UP THE ’FK’ AND THE ‘VT’ DEVICE ADDRESSES 
PT TeTii iit riti it tri ti tttitiititii titi titt ii ititttt tt tttt ite) 


024140 24142 STUNIT: CMPB  UNITFG,UNITNO ;TESTED ALL UNITS? 
- BEQ SETUTO YES, RE-SELECT UNIT °0” 

37 000001 Me4i40 CMP = #1 UNI TFG : RUNNING UNIT #1? 

oooo02 024140 #2, UNITFG | ERUNNING UNIT #2 

000003 024140 #3, UNITFG sRUNNING UNIT #3 

; BE SETUT3 

024140 SETUTO: UNITFG ‘ 

001330 MO #FKOLDB, RO ;NO, LOAD UNIT *O’ 

001410 aVTOCAR, RI 


ONOOONO0O00000 


Noo 
otro 
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BR 
SETUT1: MOV 
MOV 


SETUT2: fA 
M 


Be 


SETUT3: 


LDUNIT: KL 
#VTCAR'R3 

SETFKA: (RO)+, (R2)+ 

M (R1)+’ (R3)4 

aEKLVL te, Re 


OoOvdo000 

fee 
“J 

Soe 


on 


Poe ge a ry cg ge te ge ap ge A greet 
NE eNyere ON AN ILLEGAL T 
*FROM’ AND WHERE a TR RAPP 

3A’ ’ Is EXECUT ED. HERE THE USER CAN EXAMINE 

iT ocaT ION AND THE *TOPC’ LOCATION TO TRACK DOWN THE ERROR. 

HGH HEHEHE HHH HGH HEHEHE HGH BO HHH HG HG HEE oo aE 


ERTRAP: RESET ;CLEAR ALL FLAGS 
NULL 


oo 


(SP), TOPC ;SAVE LOCATION WHERE IT TRAPPED ’TO’ 
a Tope .;SAVE WHERE IT TRAPPED FROM 


#2; EROMPC 
TTYSWH :IS TTY AVAILABLE? 


'NO, HALT 

;TEXT "ILLEGAL TRAP? 
;TYPE "PC TRAPPED TOO 
;TEXT FROM? 


FROMPC ;WHERE IT TRAPPED FROM 
002526 JMP MONITR ;RETURN TO THE MONITOR 


5 RHR R REA EERE HARE EER EERE EERE EERE EERE EE EEA EHR AREER REE E ERR ER 
;SUBROUTINE TO PRINT THE DECIMAL VALUE IN 
5 HEE HGR 
7 . 162540 XBINDEC: CLR aPSW ;ENABLE INTERRUPTS 
160000 BIC #160000, Re 
177774 Ol665e ~4, ROPBT 
01664 
1777 TYPT1: 
TYPTe: 


n= 
=o 


atti 


ara 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
O01 


COO OOKOTrOrrrnd 
mui uw 

es 

fT 
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o-mrr"y 
z 
& 
B 
FA 
w 
—4« 
© 












uz4s 018602 os2402 avo (R4)+. Re 
448 O16604 peace 916620 ISR PC 4DECOUT 
4250 915610 37 O1eese INC R368T 

4 16614 i BNE TYPTI 

4 18£1 RT 

Y l 701 DECOUT: TST Rl 

4254 O16S22 001003 ONE DEC! 

4e55 piers 127 : p000se Hove 860, (RO) 
4323 1663e 15e70: OO0060 DECI: B58 s60,R1 
ud pibb3s 110120 MOVB RI, tRO)+ 
4253 18640 500207 T PC 

4261 O16642 9001750 DECPNT: 1000. 

4252 16644 000144 100. 

4253 516646 690012 10. 

u364 16650 000001 1. 

4e66 616652 000000 R3PBT: .WORD 






4257 ; RRRERESEERRAEARERERERAE RARE RE REERALEAEREA TEAR EELS EAE SE LEAR EEEE EEE SEES EELS 
4268 ;SUBROUTINE TO SET UP ‘FK’ VECTOR ADDR. & INTR ENABLE 
4253 WTTtIItIIIiLierririecrirelirreecerrerereceteerettttirrii coi tr rergr irri ire, 









4271 Q16654 OI7S77 COOD0D 162616 LDFKVT: MOV Q(SP),2FKINT  ;LOAD INTR SERVICE ADOR 
we7e O1s662 Ob2716 000002 Boo 82, (SP) 

4273 OLG6ES 012777 090200 162606 MOV O,aFKL YL 

wo7y 016674 063777 OO0101 1bes72 BIS sab0, KCSR . 

4275 016702 905077 62404 é CLR aPSiW sENABLE INTERRUPTS 

4275 636708 000207 RTS PC 

4277 . oe s RERSAAAAAASASLAAFAASLATASLAELELSASRAAASAALLSASELARL SL AAL HELE SAAS LAELELSALELE 
4278 :SUBROUTINE TO RESET 'FK’ VECTOR ADDRESSES TO HALT ON INTERRUPTS 

4279 idee Mat ate Ete oe ce ee tees ec rete Te 
4 0ié719 012777 o00340 162374 éLRFKV: MOV #340, aPSW 

4e8i S16716 612777 O00012 162550 MOV #12, OFKCSR 

we82 616724 013777 OCISOD 162546 MOV FALL aFKINT 

4283 016732 005077 162544 + GR BER Lvt 

4584 O1E736 000207 RTS PC 







4256 j FRERLERERERERAREREREELEREREREER ERE RERERRERA ELLER EAR EALRREEE RE EERAREELERER TE 
4287 ;SUBROUTINE TO LOAD *VT’ VECTOR ADDR. 8 INTR ENABLE 
4228 LERRRAE ARES EREAELEREAERAREREAEEEERERRR AREA RALEREREE SEERA ERE EREERERSEERERA ES 








_ HERS 
4280 «O16740 017677 ggq99g 162546 LODVTVT: MOV Q(SP),aVTINT — ;LOAD INTR SERVICE ADDR. 
4991 O16746 062716 690 ADD #2, ( (SP 
We92 O1E7S2 612777 O00240 182536 MOV #240, av 
4293 O16760 052777 OO0101 62522 BIS #101, Thee _ sSET °GO’ 8 INTR ‘ENABLE’ 
4294 016766 005077 162320 CLR aPs 
429s 916772 900207 RTS ae 






4297 JHB HHE HEHE HHH HEHE HEHE HHSGHEHHEHHEOEE EER ER EEE RRAARADEERRREREEREERE 
4298 ;SUBROUTINE TO RESET 'VT’ VECTOR ADDRESSES TO HALT ON INTERRUPTS 
4299 RRR E RRR ERRRE REE EREEERER EGR EEAEE ERASE EERERRERSA TERRA RRALAEREAREREDERERERER 






4301 O16774 012777 OO034O 162310 CLRVTV: MOV #340, IPSW 
42092 617002 642777 OCO1Ol 162500 BIC #101; aVTCSR 
#253 017010 013777 OCISIE 1ee47E MOV VILVL, OVTINT 










4305 O17022 000207 


4312 QO1702% ille7e0 O003be 
4313 Ata 1040 
4314 O17 lle 000365 
4315 pe 104010 Og 
4316 017040 lle7eQ O003bi 
431? 17044 104010 

“ 18 Bie ll2? 000370 
431 17 10401 

4320 017054 112720 900360 
4321 017060 o000Ce 


7062 00S737 O24160 


O01 

4 QO} i 

4329 017070 Ole777 000100 
Ht 7? 6162210 


0146 
737 Bi7e00 
03 
000701 
022703 154765 


000137 O0eS26 


005337 024152 


OOo00O DBDOCOOKKVHKOOOOO0O0000 

0 0 oe 

NNNNNN NNNNNNNOIN NNN 

SENSEE SFEHSRERRESSTURE 
~ 
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4304 O17016 O0S077 162474 


jREARERSERARESHEDSLERBEESEREHSERESESOSERESISERERESSEDESSLESSESER EEE EEE 
TO LOAD THE *FIELD’ CONTROL WITH THE '4’ MODES AND “SET UP 


Sn eet Ter rtT 


: SUBROUTINE 
’ BUFF 


~ MACYLL 27(732) 


CLR 
RTS 


XSTLNE: MOVB - 
NE 


j RRRERRERRERRR REEL EAL LE REE ESE REEL EL LLARERALSE EEE LE LR ARELERES EE EEAE EEE 
:SUBROUTINE TO reat IF A TTY IS AVAILABLE, AND IF SO, ENABLE 

KEYBOARD INTERRUPT 

MEREATEERETED SATE oe HEE HEHE HEE EEE EEE 


TTYENB: TST 
BEQ 


s SHRAAELLAAALHLE LLL SLLATLELAELELAALA SEALE RAL LEAR SLEAAAL SLA AARAALELSLALEESELSS 


MOV 
CLR 
RTS 


; SUBROUTINE 


XASEM1: 


WHY: 


XASEXT: 


WORDe: 


TTYIN 


TO WAIT FOR AND ASSEMBLE CHARACTERS INPUT 
:FROM THE KEYBOARD INTO OCTAL NUMBERS. 
SPeeeeeSEABESSESOUAHTEREECHSERO OSS 07 HOSEHSHEHEEEREEEEOEEESEESEERER EEA EOEEEE 


XASEMB: 
| po eYRIPN 
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aVTLVL 
PC 










#BLINK, (RO)+ ;LOAD "BLINK? a 

:LOAD LINE OF "BLINKING’ CHAR’S 
#BOLD, (RO)+ 

;LOAD LINE OF ’BOLD’ ChAR.’S 
#BLANK, (RC)+ 

;LOAD LINE OF ’BLANK’ CHAR.’S 
SUNLINE, (RO)+ 







;LOAD LINE OF *UNDERLINED’ CHAR.’S 






@CLRFLD, (RO)+ 









TTYSHe :TTY AVAILABLE? 

:NO EXIT 
iigc, ,aTkS :YE$, ENABLE TTY INTERRUPTS 
PC 








: ;GET CHAR.’S FROM KEYSOARD 
sINBUF pet uP CHAR. BUFFER POINTER 


:STRIPE N 
: RETURNS NpRE IF ONLY °1° NO. 
#701,R3 


#154765,R3 
.o4 


XASEXT 


MONITR 
(R1)+ 
oo 

hy 


RY 
CHRCNT ;DEC. CHAR. CNTR. 
XASEM1 :COMMA LAST CHAR. ?- 


;RDVANCE POINTER PAST COMMA 
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10403 y 3NO, SAVE_1ST N 
716 00002 ADD :SEt UP STACK He. EXIT 
STRIPN: RY - 
024152 T WAS ANY DATA INPUTTED? 
BNE +4 YES, $s IT 
NO "RETURN 

‘CHARS = = COMMA? 
“YES, SAVE 1ST NO. 
"NO, STRIPE NO. TO OCTAL 


;FINISHED? 
3NO 


Nniniininininiiaininice: 
Pa sp eninpeSETRs 


SUT MESSAGE ROUTINE. ENTERED VIR EMT DISPATCH HANDLER ee 
T MESSAGE ROUTINE NTERED vie EMT DISPATCH HANDLER, 

ROUTINE PICKS UP CONTENTS OF THE "Pee AND USES THIS AS 

: THE ADDRESS SSAGE TO gr DISPLAYED. 

5 JHE HHH HHH HHH HEE Eat 


VTMES: JSR PC, TTYENB sent TTY INTERRUPTS 
CLR ;CLR *G0’ 


avtcsr 
*PRE=-LOAD BUFFER 
(SP) KSTORY ;GET THE MESSAGE ADDRESS FROM STACK 
) ,AVECTR T_ADDRE 
ne AE a, AVECTR : Save as *ta’ RES TART ADDR. 
& :SET UP STACK TO EXIT 
:SAVE REG’S 
KSTORY, Re 
#100, (Re) ;TEST FOR a’ 
TERI ?BRANCH .IF NO EQUAL 
:RESTORE REG’S 
DISPSW :SET DISPLAY Sw. 


DISPSW sCLR DISPLAY SW. 
R : OTHERWISE EXIT 
VTERL: CMPB 845, (R2) ;TEST FOR 
VTCALF :IF = TYPE "CR-LF’ 
VTER2: (Re), (RO)+ SAVE CHAR. IN BUFFER 
VTCRLF: le, (RO)+ sSAVE *EOL’ IN BUFFER 
T (Ros+ tINCREMENT BUFFER 
VTERA 
SENGROUTINE TO TRANSMIT A NULL’ CHAR, TO THE PRINTR eee 
THE PRINTER. 


;SUBROUTINE TO TRANSMIT A ‘NULL’ CHAR. TO 
SERRA ERR EE ERE ARERREREEELERRERRERERRERELRERRERRERERRERRERERADRARREERERARRTD 


SoREORS 


FapOR RANE 


oa 
oF 


01 
91 
01 
01 
01 
ep 
01 
01 
01 
Oi 
01 
01 
Ol 
01 
01 
01 
01 
01 
01 
01 
01 
01 
01 


Py a! 
at 


XNULL: CLR SPACEX 
014326 1$: apr? toes 
ooocd2 014326 MOV #2, SPACEX 
017432 JSR PC; TSTTPS 





Statetetatet=tatet=tetetetet=tad 
PER gE 


peeesesss2—ere2 
Se RE TE eae 


VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
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ae 


104002 


014326 


161662 


024160 


000209 
161642 


024160 
161564 


024146 
020400 


oo0cge 
024436 
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XNULLI: CLR TP sTRANSMIT A! HAR. 
NULL Hf a7 fsrres SMIT A NULL C 
C SPAC 
BNE XNULL 1 
2s: NCB SEACEX 
P $ 
RT 
TSTTPS: TSTB  aTPS 
RT C 


Pp 
5 ERRERRERRARAAAA LEAL ELE E EERE ER EEE EERE EEE EERE SEES REESE EEEEE SEE ER ERE 
s ENTERED Me ayoren. “e AL. gett feneen FROM THE "FK’ LOGIC TEST 


ROU 
tFR MT oe ar HALT® IF AN ’FK’ LOGIC ERROR IS 
SEV TEG ats “AGP el BoRi eS Ph fat 
 euaSueunepeannsacdedananesenenne sieveesseseususensnssuannncneanenee 


FKERR: TST TTYSWH sTTY AVAILABLE? 
BNE TYPFKR “YES, TYPE FK ERRORS 
BIS BAUDIO,AVTCSR :ISSUE ’ALIDIO BEEP’ ON ERROR 
TST aSWR :TEST IF *SWIS’ IS SET 
BPL ck KHALT ?NO, INHIBIT ERROR HALT. 
MOV TSTNUM, RO :SAVE 'TEST NO.’ IN RO’ 
HOV SCOPEF, "RI :SAVE PASS COUNT 
Hoy (SP) R2 ;SAVE "ERROR PC’ IN ‘Re’ 
MOV Se :RE. R3 ;SAVE °FK CSR’ IN °R3’ 
MOV JFKDATA, RY :SAVE °FK DATA’ IN ‘RY’ 
CKHALT: TST aSWR :CHECK IF SWIS IS SET 
BPL +4 iN 
HALT YES, HALT 
RTI 


Dae eg capi sg ee cigs by gn re a oe ete oe rete 
ENTERED WITH SYSTEM TRAP *TRAP’ CALL (ERROR) FROM THE ° LOGIC vest 
THIS ExaIIneD On UP REG’S ‘RO-RS’ WITH DATA FROM THE VT T’ LOGIC TEST 


19 BE ON A ’HALT’ IF A *VT’ ERROR IS DETECTED AN ‘NO’ TELEPRINTER 
ss senceasuaseceeoncueauucgunveceneccecseenusoseueesnueseuaueseuscaeuees 
VTERR: TST TTYSWH sTTY AVAILABLE? 
BNE TYPVTR- TYPE 15 ERRORS 
TST aSWR ok 51s SET 
PL CKHAL T+4 ret ERROR HALT 
SAVREG :SA ISTERS 
MOV RO,R3 ane ete OUN 
MOV Ri'RY sSAVE EXPECTED DATA 
MOV TSTNUM, RO :SAVE FAILING TEST NO 
HOV SCOPEF, ‘R1 SAVE PASS COUNTER 
MOV (SP) Re :SAVE *PC’ 
SUB #2,Re 
TST SHE TSW sRUNNING SHIFT TEST? 


BNE VTERR1 ;YES 















447, 
re 














Soeapeanes 


Ratatat 

0+ 0 = b= b= + 0 0 

,.00 NOU £C WHO 
OOOO KOOKOOVOOHOO0OOO00000 





Ratutatatatl 





CRRCRRES 








= 
a 
o 


ee 


QOnd0K000 
= = po 


etetetatat= 
Reeeek 


papa a 


SVEN 


ieee 


017703 


V7? 


VT20 SYSTEM DIAGNOSTIC TEST PROGRAM 
DBVTAC. Pil 


161706 
161704 


161676 


024474 
Oe0232 
000007 


020162 
oe4444 


161326 


024470 


024470 
161260 





yreres: 


MACY11 27(732) 


MOV 
RY 


Rov 


ger REG 


5 RRRERRAR EER EER ERA ERR ER EERE RE EEE ERE ERE EEE ER EERE EERE EE ERE AE EEE E EE EEL EF 
TRAP _’ TRAP’ (ERROR) FR 
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aVTCSR,R3 
av RY 


sENTERED hy SYST ven 


; THIS Ri 
; MHEN 


TYPFKR: 


j RRRERL ARERR RARER ARERR EERE EEE EE RELL ELE ER EEE EEE EEEEEE HLLLEARELAAALSE 


MOV 


ENTERED WITH SYSTEM 


THIS ROUT 
WHEN AL 


VTNORM: 


VTDUMP: 


SHFMES: 


GETMAR: 





0 

MOV 
JSR 
BIT 


R 
#%ES17, ERRMES 
RO. KSTORG 


KSTOR6, KSTOR3 
PC, XPRTA 


KSTORS, KSTOR3 
Cc, XPRTA 
87, JSWR 


REPORT 
| i TYPED HEADER? 





SAVE CONTENTS OF ‘CSR’ 
te CONTENTS OF THE *MAR 


; SAVE CONTENTS OF 'MAR’ 


SUS 8 


sREST 
EXIT 


OM THE ’FK’ LOGIC TEST 
we U5 Use D TO PRINT OUT THE CONTENTS OF THE ’FK’ REGISTERS 

NA ysis RROR IS DETECTED 

Pertritititititiitiiititititritititiitiittiitttitttiitttiittttt titi tee 


rg ERRMES 


;SET UP TO PRINT 
;SET UP TO PRINT 


PRINT ERILING RO ROUTINE 


LOGEC ERROR HEADER 


) FROM THE 


;SAVE REGISTERS ON STACK 
;DOING SHIFT TEST? 
AS NORMAL ERROR 


SET. UP SHIFT HEADER 
seo oe T COUNT 


; SAVE tae DATA 
;PRINT *1* DATA WORD 


sCLR *VT’ INTR E 
sSET UP TO PRINT hse 
;SET UP TO PRINT 


;PC_OF FAILING ROUTINE 
PRINT ERROR DATA 
13. ty INHIBIT SW. SET? 


XIT 
OS TAGY SHIET TEST? 
NO, GE TYPE ’ 


; E 
ive SET WP TO TYPE SHIFT COUNT. 
SHIFT COUNT 

SPRINT IF DATA IS SHIFTED IN OR OUT 


;SET UP TO TYPE _— D DATA 
; TYPE _EXPT’D DAT 
SARE THE *MAR’ SELECT BITS SET? 


ERROR HEADER 
REGS 






* CALL (ERROR) *VT* LOGIC TEST 
INE IS USED TO PRINT OUT THE CONTENTS OF THE *VT’ REGISTERS 
RROR IS DETECT 


SHIEH GHG 
TYPVTR: SAVREG 


vT20 sysren DIAGNOSTIC TEST PROGRAM 
peVTAC. ' 


deus lee 
4548 50156 


i 
S 
AINSITOORO ERE 


A 
BRBSRSRSRSS 
8 


é 
BR 
g 


1 OO— 
— 
bx} 


001412 


SBReR8R 
ce 


SRS 
a 
Gor ern 


Raee 


4 
oO 
-_ 
£ 


017514 


020456 


020264 


020000 


000002 
090100 
024450 


024450 


o20400 
Oe444e 


024470 


024444 
020264 


161434 


024470 


161170 


024470 
161322 


O24446 


MACY11 27(732) 14-SEP-76 10:32 PAGE = 


;NO, PRINT MAR AS IS 


BIC 1 OVTCSR F THE HAR’ 
V ee Bre iy ARR ABOR. HERoht cu 


C 
ASL 
BIS BS avTcsR ;SET UP SELECTED ’MAR’ REG. 
TYPMAR: MOV aVIMAR, KSTOR3 
ar PC, XPRTA ; TRANSMIT HARACTER 
EXTVTR: Bethes sRESTO REN TSTERS FROM STACK. 
IMP CKHALT *EXI 


5 ARIE HEHE EERE REE REE RHE EEE EERE AREER AEE EERE EE EAE EERE EERE EEE 
; SUBROUTINE TO PRINT OUT ERROR INFORMATION ON ’FK’ 8& ’VT’ LOGIC 


12H AHHH HHH HHHHHHHHHHHHEHHHHHHHHHHHHHHEEHHHEHEE HEHEHE 
PRTERR: TST XORFLG 
BE . +6 


Q 
INC XORHLT 
BIT #20000, JSWR ; TEST SW-13 FOR seirert PRINT OUT 
EXTPRT ' | $INHIBIT,CHECK FOR HALT 


BNE 
SUB #2, KSTOR3 - 
BIC #100 aFKCSR sCLR °FK’ INTR. ENABLE 


TST SPAT “HEADER BEEN TYPED? 
NE Mee YES, 
PRINT 
ERRMES: 0 sPRINT LOGIC ERROR HEADER 
INC MESPRT :SET PRINT INHIBIT SW. 
PRINT 
CRLF 
PRTOCT 
TSTNUM ;PRINT FAILING TEST NO. 
MOV SCOPEF, TEMP2 
INC TEMPe 
PRTOCT 
_ Terre sPRINT THE FAILING PASS NO. 
SPAC 
XPRT: MOV (R1)+,Re 
V (R2), KSTOR3 
XPRTA: PRTOCT 
STOR3 
PACE 
C TEMP] 
BGT XPRT 
EXTPRT: TST XORHLT 
BEQ 1$ 
PRINT 
HXORH 


1$: RTS 
XORHLT: 000000 
5 RRRRREEREEARE AREER EEE RRA RE RARER ERR RER EERE RARER EER ERR ARERR ER RARRRRRRER 
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;SCOPE AND/OR ITERATION LOOP FOR EACH LOGIC TEST 
5 FEE AEE EEE JE 9 SEE RE ESE RE EEE EEE EER EE EEA EEE be aE 


SCOPEC: TSTTKS ;CHECK FOR Be ee FLAG 
161026 BIT #40000,dSWR see! anode FOR SCOPE 


SCOPEB’ S, 5c 
XORFL LG SEE IF RUNNING WITH XOR 

161010 : #4000, ISWR :NO-T 1 FOR ITERATION 
SCOPE i TRHIBTT Pred on 

020376 SCOPEF , ICOUNT ; COMPARE C ATERENt OB OUNT TO MAX NUMBER 


BPL 
SCOPEB: CMP eos 


Brae ‘Pre ViuS PROCESSOR STATUS 


a IMP RET REPEA ‘ 
——s MOV asp Ri te reounT 


CRS TeTNm 
MO He RETURN ;SAVE SCOPE RETURN POINTER 
161114 #AUDIO, IVTCSR ; ISSUE "AUDIO BEEP’ ON END OF TEST 
: RETURN INL INE-NEXT TEST 
ICOUNT: 200 S ITERATION COUN 
SCOPEF : 0 : COUNT LOCATION TEOR ITERATION LOOP 


RETURN: FKT1 
-¥K#%BEGINNING OF XOR TESTING 
XORT: MOV ae4 (6) : SAVE CONTENTS OF LOCATION 4 
M #XORERR, 384 *SET UP FOR XOR TIMEOUT 
38177060 IF XOR TIMES OUT IT DETECTED-AN ERROR 
(6)+. 84 NO TINEQUT-RESTORE LOCATION 4 
scopl ; RETURN TO TEST. 
(6)+, (6)+ “CLEAR STACK 
V +7084 RESTORE LOCATION 4 
160660 #1, JSWR  =;RING BELL ON ERROR? 
BEQ AHEAD 


1$ SIF NO, SKIP 
_ $SEND BELL 
RETURN 


4610 
4611 
4612 
4613 
4614 
4615 
4616 
4617 
-. 4618 
4619 


1$: JMP 
XORFLG: 000000 


5 REAAALAAARAR ESL L LAL ALAA AA RAEL ELA AAA ERA AA RAA ERLE RE SELES LALA AREREETALAREE 


;KEYBOARD CHARACTER TA 
53 EGGERS RA 


;START, TOP UN-SHIFTED 
CHRTAB: .BYTE 
“BYTE 
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0 
9 os 
’e 


"7 


eg 
& 


“<s WOME oD 


0 bb pe pe 
wet td | 


fon | Ba 


i XurOnowD 


136 

141 

163 

020520 144 
020Se1 146 
147 

020523 i 
020525 1$3 
1S4 

073 

‘ 072 


ae we be ee ee we 
z220<0OX¢%N 


; TERMINATE W/ SPACE 
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4696 020546 173 UPCASE: .BYTE 173 ;LEFT BRACE 
4697 pene 041 -BYTE °! : 
4698 020550 O4e , ae ; 

4 44 -BYT : 

4 one -BYT *% 

4 O20SS4 O46 -BYTE ° 

4703 047 ; VTE “ie 

4704 050 si Tie 

4705 051i -BYTE °) 

ve bee fe Me 

i243 1 BY 17S ;RIGHT BRACE 
aid 32ND ROW ’SHIFTED’ 

4713 20564 O11 -BYTE 11 

ve ee ie ie. ane 
ce eee ae 

4717 020576 105 -BYTE 'E 

4718 020571 lee -BYTE ’R 

4719 20572 124 “BYTE 'T ; 
4720 929573 131 eYTe 86°Y 

4721 Oe0S74 125 eYte °U 

4722 020575 111 eYle °f 

4723 020576 117 -BYTE ’°0 

4724 020577 120 win 6°? 

4725 Oe 140 -BYTE 140 

4726 020601 Ole Sis ae ;°LF 

ne tA Oe 0iS BYTE 15 ; CR’ 

i758 ;3RD ROW ’SHIFTED’ 

4731 020603 176 -BYTE 176 3°?” 

4732 020604 101 -BYTE ’A 

4733 020605 123 ovin 8° 

4734 020606 104 BYTE 'D 

4735 106 BYTE °F 

4736 O2961C 107 BYTE 'G 

4737 Oe0611 110 BYTE °H 

4738 Oe06le lle BYTE 'J 

4739 0e0613 113 BYTE 'K 

4740 020614 114 BYTE °L 

4741 Qe0615 053 -BYTE °+ 

4742 020616 0Se -BYTE °# 

ia 020617 177 -BYTE 177 ;RUBOUT 
4745 ;4TH ROW ’SHIFTED’ 

4746 

4747 02 132 BYTE ° : 
4748 Oe0bel 130 BYTE '°X 

4749 Oe0b2c 103 BYTE '° 

4750 Oe0be3 1e6 BYTE 'V 

4751 Oe0624 102 BYTE ‘°B 
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040 “BYTE 40 s TERMINATE W/ SPACE 


4758 

4759 

4760 ;START OF "CONTROL’ PASS 

Wes 020634 033 CONTRL: .BYTE 33 sPte? 
4763 020635 Obl BYTE 


4772 Oe0646 060 “BYTE 'O 

4773 020647 015 CNTRIT: .BYTE 15 

4774 O206S0 037 IBYTE 37 :?te? 

4275 020651 035 “BYTE - 35 :*¢°RIGHT BRACKET 
4 bet s2ND ROW *CONTROL’ 


4780 O20653 033 "BYTE 3 ; AL TMODE 
4781 20654 021 "BYTE 2 274? 
0206 Oe? "BYTE 53th es 


4795 © 5g 3RD ROW 
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-BYTE 72 
-BYTE 177 


‘;4TH ROW *CONTROL’ 
32 


& £ 
S38 8 
32 


dap Goa wo a ob 
wun 
ReoSe 


[on | ] 
= 


RRP 
NO’ £cUuTO” 
2... HERES 


a 


CHREND: ;SPACE, *DONE’ 
; HAMASAEASESEEEREESESESEEEEEEEEEEEEEEERSEEEEEEEREEESREEEEEEEEEEEEEEES 


= 
Oo 


HE TS ARE NTED_IN OCTAL AND 
;OCTAL. BYTE OF EACH SHIFT IS A CONTROL FIELD CHARACTER AND 

ee eee eee rr eksbege taacnnees sis saneunansneseneunannnnouccenecaas 
SHFTBF: .BYTE 

-BYTE ;SHIFT °1° OR *41’ 
;SHIFT °2’ OR *42’ 
; SHIFT OR °43’ 
; SHIFT OR *44" 
; SHIFT OR *45’ 
; SHIFT OR *46’ 
; SHIFT OR *47° 
;SHIFT °10’ OR ’SO’ 
;SHIFT °11° OR ’S1’ 
;SHIFT °12° OF *Se’ 
;SHIFT °13’ OR °S3’ 
;SHIFT °14’ OR *S4’ 
;SHIFT °15’ OR °SS’ 
;SHIFT '16° OR *S6° 
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;SHIFT °17" OR °57? 
;SHIFT 20’ OR '60’ 

;SHIFT ’21’ OR '61’ 

;SHIFT 22’ OR *62’ 

;SHIFT 23’ OR °63’ 

; SHIFT "BY 

; SHIFT "es! 

; SHIFT "66! 

;SHIFT 27’ OR '67? 

;SHIFT 30’ OR °70° 

;SHIFT ‘31’ OR °71° 

;SHIFT 32’ OR *72° 

SHIFT °33’ OR '73’ 

;SHIFT 34’ OR 74° 

;SHIFT 35’ OR °75° 

SHIFT °36’ OR '76’ 

;SHIFT 37’ OR °77" | 

;SHIFT *40" OR *100’ 

Earaaaaae ye reaenececane ace seed Tee eee eee ee eee eet 


asctsasccetenens 
eee 


OR 
OR 


SReGReS 


So lele loiter lele ls 
= — 0 0 
—-ONOTULCW-ONn) 


fv 


Oe 
Oe 
Oe 
Oe 
Oe 
Oe 
Qe 
Oe 
Oe 
Oe 
Oe 
Oe 
02 
Oe 
Oe 
Oe 
Oe 
. Ge 


b+ b> Pb 0 4 bE = = D-= = ho hp he 


SHFEND: . 
BYTE 


oO 
fu 


MG HE HEHEHE HEHEHE HEHEHE HEHEHE HEHEHE HA EEE Eat 


-BYTE 
pee TITLE: .ASCII °%4VT20 DIAGNOSTIC TEST 4725/75, MAINDEC-11-DBVTA-C-PB Q’ 


FERIRESS 


aot hs haan MES1: .ASCII °"FK SWITCH & LIGHT TEST”, READY FOR INPUT%Q’ 
11 | 


441 “ 
043511 052110 


051505 021124 


BEER SRRERRERRES 


Kee ee 
2S oz 
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a fy mk 


051101 2010S MESIA: .ASCII ;“ARE DEFAULT ADDRESSES & VECTORS OK (Y OR N) ? a; 


4904 el 
4925 O21172 O42504 O40506 046125 
Hee 021200 Ge01e4 O4e10) 051104 
492? Oele0g Osis05 ONese3 Oe01e3 
ie Bis Bis Ese Belt 
4 1230 - 024040 20131 ; 
4931 021236 947040 020051 
Haze Oele44 "100 
4934 3042 020113 MES2: ASCII °x"FK LOGIC TEST*xxa’ 
daze Geise3 py7eia Dsaec?  DeDlds 
4398 Geleb0 Quesey Osele3 
4 266 O40045 
4938 021270 OS2045 051505 020124 MES3: ASCII ;%TEST NO. (0-22) ....%a; 
4939 021276 047516 020056 030050 
4940 021304 031055 Oe446e 02704 
Hou. 021312 100 
494 317 _ O42 OYSSOS O4144O MESH: .ASCII ;"FK CHARACTER TEST”, INPUT "LOWER CASE’ CHARACTERS. xd; 
4944 021324 040510 O40S522 052103 Tl eed 
4945 021332 051105 40 051505 
4946 021340 O21124 O444SY 50116 
447 Gei346 Oseles Oe 0475 
4948 021354 0425287 20122 O4050 

362 O42523 Oe0047 044103 
4950 021370 051101 041501 O4eS2 
4951 021376 OSiS22 z2456 
4y953 0214 O45 OS2524 o4esoe MESS: ASCII ;%TUBE '0’, 1’ ,’2",°3", OR '4’? a; 
4954 ty 4B 0334 

424 0234 

432 OP 051117 G2 

d200 


44S O4S O47506 O44S22 MFCP: .ASCII /“ZFORIEGN CHARACTER SET (’Y’ OR ’N’ ?)a/ 


MES6:  .ASCII ;%INPUT CHAR., TEST 1.9; 


2RSoovLe 
Oo 
<= 
ul 
2 
N 
eo 
is 
tae 
Oo 
wm 
TJ 
uw 
tT 
oOo 


wm 
a 
la 
-“— 
oO 
al 
tf 
uw 
ft 
Oo 


MESA: .ASCII ;%INPUT CHAR., TEST 2.3; 


rr 
5 
ROROVOCOCO COTO PUTO PUUUOUUOD POUMUMD MromDMDB~uD 


a el Dae bs fa bes be po Ga ba b= Ge he po fe f= ta = > Bp bh bb 


62 100 
67 O4S O47111 OSeSeO MES6B: .ASCII ;%INPUT CHAR., TEST 3.9; 










HSCs 


DOOUOUUUOL 
0-2 b= b= 0-2 02 b= bo + 
00 NOUl£C Unie 


3 


2 ee eee eo 





SRRBRERRERRBRRE RRR 


021574 


B5ie10 
a 


1638 


i rrw 
2o Bae 


Fiat 


ban Vee 


a 
£ 


=> - 6 - b~ >< 0 -< 0- © & + &-- » 2 oO 9 9 p> 6-6-0 


ae 
in 


: 


+-- > -e- 


ez 
<= 
oe orrore 


MERE OE 


br 
mie 


2RORRE 
Tarai 


R 
8 gg 
£- Ww 
fu = 


het 
-—WNO 


aes 
Bie 


oO 

Ae 
OO 

ae 

oo0o0 
= 


ae 


22a 
re 
mes 


aur 


fon eine 
trite itd 


HRacen’ 


z 


Oo 
RBRe 
fj 
Wo 


its 
Ree 


046111 
029114 
0S2040 
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020061 


z 


a 


WOOTMUNO™ 


042117 
051104 
O4eSe4 

100 


042514 
OSile4 
0e0117 


MACYI1 271732) 


MES?: 


MESS: 


MESS: 


BYTE le 
-ASCII ;NOTE: THE HOST DIAGNOSTIC, EITHER FOR THE PDP-§ OR 1! MUST BE; 


MESiO: 


MESSA: 
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oASCII :%"TEST COMPLETE" a; 





-ASCII =; TEST ADDR.” a; 


-ASCIT ;"VT2O SYSTEM EXERCISER TEST”. ; 


BYTE 12 






-BYTE 


le 
»ASCII ;LOROED INTO THE HOST COMPUTER BEFORE RUNNING THIS TEST.; 





BYTE 21 
«ASCII ;"VT COD ADORESS TEST”.2; 







-ASCII ;%ILLEGAL TRAP TO a; 
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051106 O46517 MESEC: .HSCII ;. FROM a; 
Se AER MESSC: .ASCII ;CHARS.: 0000 RECV’D: OONO XFERS.: 0000 ; 


i eeceese 
SBN 
mpd 4 
225522 
R 
Ses 
BR 
res 


Feary 
ge 
9 
Res 
aR 






2eat usta 


















: 0000; 

O22 030940 030060 os 

022251 ~ O12 BYTE 12 

beeese 01 BYTE le 
cos O2e253 031 BYTE 31 
5O46 
. 5047 EVEN 
ebas pecee re 451 0123 MES! Bech THIS MESSAGE IS BEING LOADED FROM AN ODD STARTING 
5050 REsses ouzeie Be je39 Sages : 
5051 g22270 020105 51511 oy 040 
abe eG ee at pieets Sgoug0 
5965 BeSsa5 sate busiis 020104 
5056 922326 OS2l23 051101 o44Se4 : 
5057 022334 043516 040 
5058 022337 101 o42104 o4eS22 .ASCII :ADDORESS. HOW DOES IT LOOK??; 
5053 022344 051522 o20056 047510 : 
5960 d223S2 920127 042040 042517 
‘$061 022360 Devle3 052111 O46040 
5062 022366 047517 037513 077 P 
5063 bees “BYTE 31 
5064 052123 047040 MESI3: .ASCII ;%7TSTNO PASS MA CSR DATAQ: 
S065 O2e402 020117 O50040 51501 . 
5066 beeti0 bedie3 620040 OuEaHS 

¢ 
cee Genes Geile Geog Cetow 
5070 022437 O42 O45506 OS1040 MESI4: .ASCII ;"FK REPEATISILITY TEST", READY FOR INPUT. %2; 
5071 o22444 950105 O4050S ouHees 
Seta ead Os Sos 02112 
5074 O22466 O200S4 O4 042101 
5075 022474 020131 947506 Oe0le 
5076 02 O47111 OS2520 027124 
6977 022510 o4o04s . 
2078 02251 puts 940519 0271 MESIS: .ASCII ;%CHAR.~CODE(S) a; 
1440 O421! 4j 

S080 O2eS26 0e4s23 oc40040 
$082 oe O22445 051524 020124 MESI6: .ASCII ;:%“TST NO PASS MA CSR MARQ; 
£983 022540 047516 O20040 O40S520 
5084 Oees4e 051523 beno40 peno4d 
508s O2e5s4 o40515 O20040 Se0d40 
S086 Oeesé2 051503 OeCice 020040 
£087 22570 O46440 OS1101 10 








DO8 
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e 
a 
> 
vY 
tJ) 
a 
a 
& 
ta 
| om 
= 
o 
~ 
= 
ea 
- 
w& 
we 
x 
w 


ul 
> 
to ee 
a | cf 
oe = | x 
o 
? 2 3 
=: = 
. ? Hee Soy 
e as 3 
us Ye 
wn i an * 
ur S x Y 
a. - ao 
_ 3 
i J tas Y 
- “ S = 
- a S 
wm Ps Y 
4 ta bay i 
i 2 = 
o- oo ee oo 
-* - _- o-7 
o Com oe ~e 
a a a in 
=z =z xz ue 
. 


a 
ay 
w 
2 


MES18: 


cae vane lersas 
sien a aa 
tara Wumeiae © 
Te Sees 


NTRLA: 
CRLF: 


100 CNTRLC: 


100 


C22591 


me 


023008 O41 i 027045 


023005 
023011 


"a" 


-ASCII 


100 


O45 


*9 


ASCII 


100 QMARK: 


077 Od20040 


023013 


siete tsietetstata tate pete Aire 


3%°VT20 LOGIC TEST’ %a; 


-ASCIT 


OS3042 031124 MESeC: 


PTRP POS OO POO fun HUUBMASAMAIOM TF 


**ZARECOVERED FROM POWER FAILURE a” 


-ASCIT 


SOS MES21: 


ReneS 


ame 


s INPUT THE "UPPER CASE’ CHARACTERS. “a; 


-ASCII 


aus 
ststatstetats} 


; INPUT THE ‘CONTROL’ CHARACTERS. Xa; 


-ASCII 


113 050116 OSeleS MmeSse3: 


023147 
3 923154 OS2040 O4e510 des440 


2 


TS 


ASDASPASPASDASPASPASDASDASDESDASDESDASDASDASDASDASDASDASDASDESDLSDASDASDESDASDESDLSDASDASDASDASDASDASDASD ANDAs DES D ASD OSD 





a ee 














1? 





wmv 


+ pp - op -- 


BBR RLOO LS BSVRR G0 Bsa Noa FINS SS GH Elo www rude conor Coane 


Taltartalealealeareareal eal eal tales eae ea tata aerate aaa alate ral alta alta al ial ia] 
0 = b= 0 b= 2 0 = b= bo Be 2 b= = Bo be be 2 Fs bs bo 2 0 bs 2 b= 2 b0 bo 2 Po 2 eb Fob 0 Bo 2 Os 0 2 bo 2 Bo 





023162 
2170 
3176 
3204 

ie 
32 


aa 
Oe3eSe 
023260 


047503 
14 


aS 
£ 


z 


sme 
ert tii ste tot 


pe 
Fist 


rt 


ee or 8 
OrmLn 


RA RE B 
oor 


OG) 


Pan 


052116 
at by 


tae 


ages 
bepee 


RBA 
pe 
ah 
oO 


2 


a 


RRR 
a 


BRBERR Rae 
seieats 


2 
ve 
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052105 
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MES24: 


MESeS: 


MES2E: 


MES27: 


MES30: 


MES31: 


MES33: 


MES34: 


MES3S: 


MES36: 


MES37: 


MES38: 


MES39: 


-ASCIT 


-ASCITI 


-ASCII 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCITI 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCII 
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; OUT a; 


;"BOLD PRESET TEST"9; 


;"VT CHARACTER DISPLAY TEST” a; 


:“VT FIELD CONTROL TEST”d; 


;"VT CSR PRESET TEST” a; 


;"VT LINE FEED TEST"d; 


;"VT END OF SCREEN TEST"Q; 


;"VT BLANK CONTROL TEST9; 


;"VT ALIGNMENT TEST"@; 


;"VT FOCUS TEST"; 


;"VT WORST CASE TESTd; 


;“VT CURSOR MOVEMENT TEST"2; 





Bese 


0-2 0b 0 8 b= 0 Bb he 
00 YOU .£C WTO 


8 Cerna 


POrony 


Aattdidatitiditistitidatic 
FHSBOIRR IED 


024106 


0240 
ott 
44 4101 
Se4s 
S246 


xc 


Bes 
Paehee 
eee??? 


mR 

ee 

= 

ee 
One 


8 


B 8 
Re 
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AC 
5200 
eh 


OS1S0S 021124 


ce 
OS2040 051505 
00 ) 
Oe 
20 


= 

= 

S 
2 
~ 
on 


2 222222R R222HRP FZ 
fg cetone Geiiees Gal § 
‘BR22R = REREBER 
: EReS25 §e#osnq ae 


Sen 


04 
043040 
041125 
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MES4O: 
MES41: 


MES4e: 


MOLVA: 


. . . . 
DYHDDM 
Ww =< 


-ASCIT 


-ASCII 


-ASCITI 


-ASCIT 
-ASCIT 


ASCII 
“ASCII 


-ASCIT 


oOoom 
eee en re 
bate 


-ASCIT 
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;"BLINK PRESET TEST" 9d; 
;"BLANK PRESET TEST"d; 
;"UNDERLINE PRESET TEST"@; 


; “RUNNING TUBE 0a; 


“RUNNING TUBE a; 


(7>/9/ ' 
/“%PROGRAM RUN IS ABORTEDA/ 


/7NUMBER OF TUBES? a/ 


SENT Q/ 


SUFK 7 
/ VECTOR AND ADDRESS FOR TUBE a/ 


7% DLII VECTOR FOR TUBE d/ 


LEVEN 
SADDRESS AND CONSTANTS TABLE 


STACK: 
UNITFG: 


;CNTR *A’ VECTOR ADDRESS 
-3°SP’ INITIALIZATION ADDRESS 
;SOFTWARE SW., SET IF BOTH UNITS AVAIL. 








ae DIAGNOSTIC TEST PROGRAM 


024142 


b— 6 b+ O— & = b+ 9 -- > b= p— be ps 


CNSR ERS CCSR OOORE 


PRPS PPS yy eye y: 


SeS6 
a8 
5259 
e501 
es 
5265 
a 
eh 
Se 
5275 
5276 
Bs 
t 
5281 
Se 
5284 
5285 
5286 
5287 
5288 
5289 
5290 
S291 
5eSe 
5293 
5294 
5295 
5236 
5297 
5298 
5299 
5308 
§301 
e303 
5304 
5305 


MACYL1 27(732) 


OOVKWWOHKHOOKOKOOKOBOOOOOKO0O000000 20000 oO 


OOOOOOO0O00O00000: Al” , eece 
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SCONTAINS NO.OF wars AVAILABLE 
eourahe CURRENT Ltt” TERN. 
a gets cTER COUNTER 


SOF THIGRE o) SW., SET IF TTY AVAIBLE 


; SOFTWARE SW. 
:SET IF RECEIVING bw EXPECTING DATA 


;SET IF TRANSMITTING DATA 
;SET IF START CODE (377) WAS RECV’D 


;CONTAINS NO. OF CHAR.*S ON SCREEN 


;SET ON ERROR DETECTION, CLR’D VIA SWI1S 


;SET TO STOP CONTINOUS TRANSFER 
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;SET ON DL11 TRANS. INITIALIZATION 


: bh Ne iat FREE LOCATION AFTER 


;SET IF DOING CONTINOUS TRANSFERS 


es 


SOFTWARE PRINT INHIBIT SW. 


TEPoReRT STORAGE OF *PC’ 
. ; TEMPORARY STORAGE OF *PSW’ 


;PERMANENT STORAGE 
;P NT STORAGE 
;PERMANENT STORAGE 
PERMANENT STORAGE 


: Q 
: 0 
7 
: 0 

0 
0 
0 
0 
: 
0 
0 
: 0 
5 
: 0 
: O 
: 0 
: Q 
: O 
0 
: O 
0 
: 0 
0 
= 
0 
0 
1 
0 
0 
0 
0 
0 
0 
0 
0 


Ke TORE: 


;HERE STARTS A ‘1200’ WORD ‘VT’ BUFFER USED FOR ALL 
VT DISPLAY TESTS. DATA TO BE DISPLAYED IS ASSEMBLED 
IN EACH INDIVIDUAL TEST AND STORED HERE. 


VTBUFF: .BYTE £0S 
-BYTE 0S 





ee en ae ee ee 


108 
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«END 


900001 


TAC.P 
a 
70 
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oulb 


- 
| 
| 
| 
| 
| 
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RSENELs 104015 1562 1567 31570 ~=—ss«1582 1899 1616 i629 1672 3011 3725 
4 4436 4605 


3573 3575% 3576 S<e978 


3385" a8" 3573" 218 222i 2M £227 


4363 4370%  S2608 
Sesss 


e984 42808 


ECOUT Olb6e2 
DECPNT Olb64e 
DEC! 016632 4257% 
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12628 ce 3 5336 AlN Gnas 2517 
le74e i 1 49 408 4396 

leS8# ee e3 232 2332 36 2340 
oife e507) S340 SSB Os e796—Sti«i2B8'S 2854 


3152 3169 32468 3249 
4397% S34e8 


2 
a: 


i etetated 
ison 


2888 
Dees 


i 


2448 


3524 


4385 
53138 


oe 


304S% 
3054 


FKCSR4=~000004 
e84b* 


FKDATA 001476 
FKERR ; 

FKFUN 1 

FKINT 1500 1688% 1691% 
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2889 
2895 sauce 4201 


3019 
4609 


3438 863451 3Se5* 


1575 4190 


SeRSre nse aa aRRes 


£WW FEW) 
So fer Lo Luan 


3539 3607 3615 3620 


St=t=t=t=ts{={=t=t=|=|=|={=t==|=|=1=1=|=|=!=1=I=1=1=: 


wr 


30404 
3047 =6©3049 8=_- 30528 





GRETA OND ene lmao e 
FROMPC 024164 4220e Ye2ee 4233 S26Ss 


Greet iis a a 
S444 34 3671 3674% 3676% 3849 4082* 4084 52898 


eSsoe e786% 4594 46078 
4339 


ate 
Be 


sadaa 
IED 


334 
88 
pal 


a 
re 2 
One 


5 


Z2Z2ZZ2ZZ2ZzZ 
i) 


c= 
o 

TMU GWIGI— TU 
Rit 


: 
t 


233 


EEE 
eee ye 
peat 


3334 3338% 3349 3353% . 3364  3368% 
3741 4046 53558 


ySo4e 4550% 4569% 4571 5357% 


: 


Satetattetetetetet init 
seg eu 


FRE 


3907% 


Tt atitattet tt = 
Beesores 


RRO 
Ries 


3379 





DavinG-PLi CROSS. REF 


MESIO 22104 
MES11 Oeeess 
MESi3 O22374 
Hi Ee 
5 Bee 
MESI8 O2ee661 
fe2i° peel 
a 
ie 
MES23 02314 
MES24 3210 
Se tee 
aS es 
HEeSO eet 
Ba bes 
MESSY 023451 
ME 023471 
MES3&6 023516 
MES37 023550 
MES38 023561 
$39 Bs 43°5 
SY = G2131 
S fs 15 
al Be 
4e 02366 
MESY3 023715 
MESH4 023735 
MESS 021403 
MESSA ak 
MES6 151 
MESEA 1541 
MES6B 021567 
MESEC §8 O2e2155 
MES? 021615 
MESS 021641 
MES8O Oeel64 
a6 Bs tboe 
C 1445 
MFKP_ 24037 
MONITR O02 
MOVBLK 005716 
MOVEIT OiSile 
MOVE 014102 
MOVEe O14136 
MRUNN1 014750 
MTRSWH 24172 
TP Oe403e 
ORH 023756 


rious 
Ou ~jiwoo 
2 SS SS SE SE SE OS OE OE SE 


Poorer 


UTTUN WIN ££ 


wo 
co 
se 


49808 


3092 


1680 


"1586% 


52684 
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3094 = 8649908 


37933819 4e34 = 4352 


1591* 1598 1603% 1610% 1615 1621% 


3842s 


3843% 


3845 


38568 









Pimp §=6s- De4132 





PUSHIS= 005746 
PUSH2S= 46 


Oe46 
PWRFAL O16014 
PURUP 016050 





023013 

UFO  O01530 
PEUF] §01s32 
REUFS © OO1E34 
RBUFS © OD1E36 
RCSRO 001520 
BCR, O12 
Ree 1859 
RESRS  QO1526 
REcsuO O24i74 
RECS] 054176 
RECSu2 24200 
RECEWS Oe4e02 
RECTRO Q54a20 
RECTRI 54352 
RECTRE O24304 
RECTRS 24326 
| RECVAB O140B2 
PECVAC O14034 
PECVES 013626 
RECVBC D136 
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1282 
35108 





14928 
SS4S# 


MACYL1 


Se77e 


51198 


35564 


3550+ 


7i7de) 


3693 


SE43* 





3659# 


387% 
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$2698 


53058 








Fs 
2222 
S358 


meninrArneArArnenin 
etetetete 


minininin OOIOOOINGNM 





BOS5= 






Ri 


DBVTAC. 


‘=~0000 
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Be 


Pore 


20 
oe 


ae 
FEE 


SOIRNOD 
re 


nine DD 


Reeassessss 
eirdetete 
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36758 
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53218 


407# 
740% 


3345* 





2473% 
4604# 
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SAVeSW Oe44ée 
SCOPE = 104001 


SCOPES. D20332 









RRMA 
Basso HRSe 





DBVTAC.P1l 


Soa 


ONd0000 


ReBde 


O-* b= > ~ > b= B= & = b= 8 -- pp 


Ww 
os 
b= 
o 


QOONOO0000000000 
w 
Rrmase 


b+ O-- & © 2 bh -~ b= p> § 0 @ - P 


8 
SRR 


pee 


oOod000 
& 
oo 


poate 
Lore 
> NOWO® 


sue 
Cries 


e+ 
= 


i 


co: 
is 


ne 


Seen 
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Wiig 4466 4562 SSH SSH ©4500 46088 
46008 





2ll4# 227% 2228 S343 





35048 3675 
a 


32066 3863272 0S 34388 





3476 3483) 48S) 38003512 «= S16 2S 9519sSeSe = 3829 
% 

8 

asl} 3538 

331 3688 

5 1602 






16818 
~ 


3731 3735 
3733 








2llé 2131 22278 2241 22 568 
1e88% 1289% 1290 1293% eM4# 1295% 12968 1297 1494e 16518 2148 
pea ec. sev sere ssegt Ee the 8" 7. sae 33408 ee 
86 3337 3338 3338 3338 3398 3399 307 340 
agi aiae 3419 3420 sh aces 3430 3433% Be 3868% 93 
939% 4089* 44096* 4097 4O98* 409S9* 41008 410l*% 4!9es 103 4107% 
4110 411] 411 4113 4114 4127 4128 4129 41318 132% 
4135* 4136% 41378 4Y138*% 4139% 4145 4146 4147 4148 414 4150 
4153 41S4* 4415S* 41S6% 4157% 4166 4167" 4218 4220 4271 42728 
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4291% 4361* 4386 4387 4389* 44H4e 4468: 4489 4615 4597 4601 46034 


a3eh pr 4572 
37S4% 3 68 Y41le Yilee Y414e 4418 4e0s 
250 37918 / 


38158 


g2 8 


£nNtTv 


Fe r Sit a 
AD 


2e0s4 2070 


Ooo 
—WTu 


g 
Besar 


iJ 
GL 
oe 


aad 


ae 


4 
1 
1 
38 


® 


1668 2257 
3729 «3851 
asses 4618 


i 


4033 

2257 3851 
245172 . 
242 <= 403 


=| ; 


30858 3087 
26718 
26878 
2823 
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wot 
ae i oe Se 


oro 
ae 


268% 4020 © 4037#. —S103% “4107 ««44B7# «4509 «= «513% ««4573e = S347" 
eg76# 3994" §=63995*# «=94Oe4e §=640ebe 864095" §=4S6e% 4562" 4565 Sc4es 


3 


SSazhe 


a8 


Se 


NNAINNNN 
aviatiet et ein 
LI ONIUTIO 


MNNNS 
wWe-.on 
esx SE SSSESSSKSSSSeSeesweeeees 


2480 


ag 


4329% 


5264s 

3878% 3880% 3883% 3906#  4416# 
3869 81 3904 =| 4424 

3688* Ole 


So 
— 
coo 


1 
1 
ra 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
| 
4 
1 


ae 
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TRANE 011736 3163 32888 

TRANS 11735 1 32948 “ 

oe ne a a ee 
TRNSW3 . 








T 4459 
UNITFG 024140 1SS4% 15208 1631 1633 §=1635# 1655* 3835% 3837 3843 4181 4183 4185 4187 
ASE 

VISEOL= east 14658 e385 2389 3978 4001 4003 4007 8640090 «4011! 4015 

VISEOP= 14 14668 4002 4894004 4006 4008 4010 le 4014 

VISEOS= 31 14678 sii3 eYel eS15 eee 3982 4016 

VIBLAN QO8660 1703 Suan BaNs 

VIBUFF Beae00 1903. 1916 1928 1942 19970 2301 0S 384 INS S190 sl22 SiS (aes 
3180 3153 3167 1700S 3190s: 3193's 3198—s«3199ss« De 3e08 4 8gell 3216 
asta are at53 g67) $e33 3236s 3239 3333 3483863378398 

VTCAR 001504 saute Be ioe 18Sex 1858% 1865* 1867# 1877% 1689% 1895* 2036% 2053%  2Sit# 

VTCHAR O05166 1699 2°06 & 2286 

VTCRLF 017, 4400 444038 

YTCSR 001510 14138 Ue. 1e4O0e 1844%  1853% 1857% 2058 53708 2334 5 S8* e342% 2416% 2441% 

*# e479% e494*# 2516% °cS36% 2538% 2798% 2817% eos ee ® 4O66% 
wes 4302" 4384 4Wiobe 472 YSll* 4514 4Se9% 4533 4605s 





—tiigtten: 4O93% 36 4S] 
¥TCSR4=~000004 le2z2e §=61748% 8 61775% = 1777 1797# «©1798 1803% 1810% 1812 1815% i 
1879 1890% 1894* 1904% 19178 1929% i1944% 1958% 1962% 1974% 1978% 1994%  1999% 
; ‘ e013® 2017 2037% 2038 2041 eO44# =82054# e0b2e c070e c071 20748 e150 22288 
VTCURS 08042 1717 = 25068 =—eSeS | 
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23628 23% 
24 


as 


6 
eagepece 
a ee 
ee rururur 
Be 


~6338 
Wt — 


1980 «1891 
2253 


and 


He 
oe 
aaa 


8 
& 


1945* 1957# 1959% 19728  1992% 
2214e 2230% 2537% 4O6S* 41748 


£ 


1 
201 
1 


3 


oo pe 
£osr 
™“N 


SEL EL 
FAS: 


SRLS Lovers 
“ 


at 


888888 


S8S88ss 
riniesetieintenicteisteters 
SSW 
SeueeeeiTs 


BeSRR LAS 


bb b= & bb FF 0 Bb Fb Bh 0 Bb bb = 0 = 8 bb = 8 
0 
Ww 
cog 


Wu 
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aa anwar 
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2683 
266? 
2663 


1876 
2067 


2678 
1887 
2082 
2678 


1887 
2082 





2710 
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e710 
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2727 
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RRR eB we 


CMP 
ad ee BSL 
Sey S741 San Sana Sek HTS HIDE lgh RGR (aK 
CMPB 385 r | 2030 304 8 34 3 378 
41 > a 3 3731 7H 38 3 1 
3%3 3955 3967 399 3971 3975 =. 3978 
COM 3583 3482 28=—- 3977 
C 1 : 1540 is) 1382 a ise = ae ik a 
EMT 1358 1 1261 ieee 126 1264 126 see 35 
1 1 e e76~—sile 1278 
HALT le92 Ss 1510 151 1523 1 1534 1537 1545 1553. s:1667 
teat o> !t YA 
INC 1 1656 2101 2130 «= 2l6S—s 2 eee7 0s e314 = 2372 
sese 5b6/ a8 Zi fe A 1 3 82 e822 
4 43 7 87 8 568 ET : a3 93 3831 
iba7 ae4e B76 4117 By 4 i ag86 4441 446 4504 
INCB 1586 1603 i621 ‘Wile 
133i 535 i 297 519 677 1743 7 2858 e859 
284 93 e 334 49 364 3379 447, S448 = SHE 
3819 ° 3987 4Yilel 42 43 449 453 4599 166 
JSR 1528 539 15 16 163 165 165 1660 = 176 2087 
2e1e8 3=6el3l = 2143) 2149 526) 2171 2182 2195 2239 ecse 
2343 a3 eSS8 e665 eb 2689 2705 eel e7e9—s 7 
3124 128 3=—s 31Se = 3169s 3h 32S4H 2S 3259S «3260 65 3266 
3283 3288 3°89 3295 3300 3301 3305 3306 3311 
35 3607 3615 ed 3733 3735 3836 3865 3891 
4299943404389) HIS = 4179s S22 S526) 4535 
MOV 1e87_ «1e89)s—sia1e9si“‘(<éiaSD HOD 1494 1500 §=1501 1505 1506 
1524 14 ese 1533 =: 153 1S38 )=—ss«iS4#2=—s«1543 1544 = «1546 
1564 861568 ~—ss«157 1576 =: 158 >, 600 1607 
1630 1631 1651 1658 1661 1668 1681 2 1683 1687 
1753 4 1755 7 1775 777—-«1788—Ss«d1797Ss«d1798—Ss«d18110 


es4 essO 30s e551 7 i ~  ¢ ni , 5) eS 
2681 gees 269 2696 2697 2698 #2699 set e712 3=s 2713 
2808 1 282 283 e837 8662868 86 e889 ess 2897 
es75—i3019s—s ee «= 3085 = 087 )=s 3088 «= 308 3092 309% 3105 
3119 83115 3116 3117 3118 3119 312e0 3glel glee gle3 
3131 gise 0s 3133 3184s 3195s 3136S 3137) 3138 = 3139S 3140 
3148 3149 3150 3151 eins 15% 3188 15m g187 93 
3164 3165 3166 3167 3168 3170 3171 3172 8=— 3179s 231 
3184 3185 3185 3187 3190 3191 3193 3sIK 31% di 
3e06 3208 = 3209)—Cts S21 Sele 3216 3217 3219 3220 ~ 8 22 
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T SYMBOLS 


ERRORS DETECTED: 0 
DEFAULT GLOBALS GENERATED: © 


#DBVTAC , DBVTAC. SEQ/SOL/CRF DS: ERF2/EN: ABS=DSKM: DBVTAC.P11 
UN-TIME: 16 34 7 SECONDS 
RUN-TIME RATIO: 169/59=2.8 
CORE USED: 14K (28 PAGES)’ 
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